ИнтеллигенцияX

Узнаем и задаем раскладку клавиатуры.

1033 - код английской раскладки клавиатуры [EN] (США)

1049 - код русской раскладки клавиатуры [RU] (Русская)

Узнаем раскладку:

MsgBox(System.Windows.Forms.InputLanguage.CurrentInputLanguage.LayoutName)

Меняем раскладку:

System.Windows.Forms.InputLanguage.CurrentInputLanguage = InputLanguage.FromCulture(System.Globalization.CultureInfo.GetCultureInfo(1049)) ' Меняем раскладку на русский язык

System.Windows.Forms.InputLanguage.CurrentInputLanguage = InputLanguage.FromCulture(System.Globalization.CultureInfo.GetCultureInfo(1033)) ' Меняем раскладку на английский язык