Declare Function ActivateKeyboardLayout Lib "user32" (ByVal HKL As Long, ByVal flags As Long) As Long
ActivateKeyboardLayout позволяет переключать раскладки клавиатуры, доступные на вашем компьютере. Раскладка клавиатуры определяет расположение клавиш
В случае ошибки функция возвращает 0 (используйте GetLastError для получения кода ошибки). В успешном случае возвращается дескриптор предыдущей раскладки.
HKL_NEXT = 1 | Активизирует следующую раскладку |
HKL_PREV = 0 | Активизирует предыдущую раскладку |
' Переключаем раскладку
ActivateKeyboardLayout HKL_NEXT, 0
GetKeyboardLayoutName, LoadKeyboardLayout