Public Sub EnterToTab(Keyasc As Integer)
    If Keyasc = 13 Then
        SendKeys "{TAB}"
    End If
End Sub这是一段在文本框中按回车以后光标自动跳到下一个文本框中的代码切换输入法的方法是按ctrl+shift你换成这两个键的ascii值来编辑识别我想应该能实现的!