查看完整版本: 如何自动更动成中文输入

如何自动更动成中文输入

　　如果使用的VB5.0则，查看有没有一个属性是IMEMode，如果有就设定为1 代表开启，那
便可以每次进入这个Control项时就切换成中文输入。如果没有，那只好自己做。

'以下在.Bas
Public Declare Function GetKeyboardLayout Lib "user32" (ByVal dwLayout As Long) As Long
Public Declare Function ImmIsIME Lib "imm32.dll" (ByVal hkl As Long) As Long
Public Declare Function ImmSimulateHotKey Lib "imm32.dll" (ByVal hwnd As Long, ByVal dw As Long) As Long
Const IME_THOTKEY_IME_NONIME_TOGGLE =