怎么用vbs将搜狗输入法设置为默认输入法
怎么用vbs将搜狗输入法设置为默认输入法，我之前已经编写了一个像下面这样的程序，但就只缺这个输入法了，要是有大神能帮我改一改就最好啦：
set fso=createobject("scripting.filesystemobject")
set ws=wscript.createobject("wscript.shell")
fso.createtextfile("surprise.txt")
ws.run("surprise.txt")
wscript.sleep 500
ws.sendkeys("zai")
wscript.sleep 500
ws.sendkeys("ni")
wscript.sleep 500
ws.sendkeys("guo")
wscript.sleep 500
ws.sendkeys("sheng")
wscript.sleep 500
ws.sendkeys("ri")
wscript.sleep 500
ws.sendkeys("de")
wscript.sleep 500
ws.sendkeys("shi")
wscript.sleep 500
ws.sendkeys("hou")
ws.sendkeys(" ")
wscript.sleep 500
ws.sendkeys(",")
wscript.sleep 500
ws.sendkeys("wo")
wscript.sleep 500
ws.sendkeys("hui")
wscript.sleep 500
ws.sendkeys("gei")
wscript.sleep 500
ws.sendkeys("ni")
wscript.sleep 500
ws.sendkeys("yi")
wscript.sleep 500
ws.sendkeys("ge")
wscript.sleep 500
ws.sendkeys("jing")
wscript.sleep 500
ws.sendkeys("xi")
wscript.sleep 500
ws.sendkeys(" ")
wscript.sleep 500
ws.sendkeys("!")
wscript.sleep 500
ws.sendkeys("--")
wscript.sleep 500
ws.sendkeys("NIMO")
wscript.sleep 500
ws.sendkeys(" ")
wscript.sleep 500
如果1.要运行此脚本的电脑中的搜狗输入法默认设置没有更改，或者
2.可以自己提前进行输入法的设定，
那么 实现你的要求比较容易：
搜狗拼音的默认切换快捷键应该是[Ctrl]+[,]组合按键，
如有条件，可以查看该设置 > 如（图1）在搜狗拼音的“设置属性”或“管理/修复输入法”下，选择“输入法管理器”，就看查看或设置切换的快捷键，注意快捷键组合第一个按键必须是[Ctrl]键，第二键可以自定义。
下面以默认快捷键“Ctrl+,”为例编辑VBS脚本
在原脚本文件“ws.run("surprise.txt")”一行后插入如下几两行行：
wscript.sleep 800
ws.sendkeys("^,")
然后接原文后面的“wscript.sleep 500 ”即可。
延时可以酌情调节，后面这一行的500可以改大些（比如1000）以防输入法没有及时切换。
再把前几行完整给你列出：
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
set fso=createobject("scripting.filesystemobject")
set ws=wscript.createobject("wscript.shell")
fso.createtextfile("surprise.txt")
ws.run("surprise.txt")
wscript.sleep 800
ws.sendkeys("^,")
wscript.sleep 1200
ws.sendkeys("zai")
''''''''''''''''''''''''''''''''''''''''''''''''''''''''' 后续部分没有改动，省略
保存即可，效果如图3。
图1
图2
图3.运行效果
