|
|||||||
Время создания: 16.03.2019 23:43
Раздел: !Закладки - VBA - Access - msa.polarcom.ru - 16 Система
Запись: xintrea/mytetra_db_adgaver_new/master/base/1532018747xnbsuebmhn/text.html на raw.githubusercontent.com
|
|||||||
|
|||||||
Переключение раскладки клавиатурыПрислал: Александр Коротков norma@mgn.ru Declare Function LoadKeyboardLayout Lib "user32" Alias _ "LoadKeyboardLayoutA" (ByVal pwszKLID As String, ByVal flags As Long) As Long
' Переключение на английскую раскладку Function KBDToENG() Call LoadKeyboardLayout("00000409", &H1) End Function
' Переключение на русскую раскладку Function KBDToRUS() Call LoadKeyboardLayout("00000419", &H1) End Function |
|||||||
![]() |
|||||||
|
|||||||
|