以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助 中文输入转半角  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=114508)
--  作者：jackyfashion
--  发布时间：2018/2/7 20:48:00
--  求助 中文输入转半角
老师:
            您好!
列设为自动中文输入,经常会碰到全角中文
怎样可以自动中文半角输入?
谢谢!!!
--  作者：有点甜
--  发布时间：2018/2/7 20:52:00
--  

这个没办法。

 

试试用代码切换输入法

 

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

        msgbox("切换到搜狗输入法成功")
        Exit For
    End If
Next
--  作者：jackyfashion
--  发布时间：2018/2/8 1:00:00
--  
谢谢老师!!!