以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]输入法问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=72344)
--  作者：pcxjxjhkw
--  发布时间：2015/7/28 17:05:00
--  [求助]输入法问题
如何实现：进入一文本框，输入法自动切换到中文输入法状态。
--  作者：大红袍
--  发布时间：2015/7/28 17:22:00
--  
 

比如，如果要切换到某一输入法，可以这样，比如代码

 

For Each lang As Object In Windows.Forms.InputLanguage.InstalledInputLanguages
    output.show(lang.LayoutName)
    If lang.LayoutName Like "*搜狗拼音输入法*" Then
        Windows.Forms.InputLanguage.CurrentInputLanguage = lang
        Exit For
    End If
Next

msgbox("切换到搜狗输入法成功")