VBS如何用Sendkeys输入大写字母

raozhao2008

如题
不知CapsLock处于ON  or  OFF

lixiaodaoaaa

可以输入大小写，vbs自己判断
可以输入大小写，vbs自己判断

1. Set ws = CreateObject("Wscript.Shell")  
   
2. ws.run "cmd /c start notepad.exe",vbhide
   
3. wscript.sleep 2000
   
4. ws.sendkeys "A"
   
5. 
   
6. ws.sendkeys "B"
   
7. ws.sendkeys "a"
   
8. ws.sendkeys "b"
   
9. ws.sendkeys "c"
   
10. ws.sendkeys "d"
    
11. ws.sendkeys "e"
    
12. 
    
13. wscript.sleep  1000

复制代码

[ 本帖最后由 lixiaodaoaaa 于 2008-9-29 21:49 编辑 ]

zqz0012005

vbs函数UCase
ws.SendKeys UCase("hello")
=============================================
为了某个目的的类似问题请不要分成多个帖子！尽量一次性描述清楚！

zqz0012005

发送CAPS LOCK键就能保证锁定大写了吗？
注意楼主的状况是“ 不知CapsLock处于ON  or  OFF　”