mshd.net
当前位置:首页 >> 怎么用vBs代码按按键 >>

怎么用vBs代码按按键

1.基本键:一般来说,要发送的按键指令都可以直接用该按键字符本身来表示,例如要发送字母“x”,使用“WshShell.SendKeys "x"”即可。当然,也可直接发送多个按键指令,只需要将按键字符按顺序排列在一起即可,例如,要发送按键“cfan”,可以使用“W...

set ws = createobject("wscript.shell") do while 1 '按下alt+F4 (建议用其他的键来试验例如"A"因为alt+F4 是关闭当前窗口, '关完窗口就会打开关机窗口) ws.sendkeys("%{F4}") '每次循环等待时间3000=3秒,以毫秒为单位的 wscript.sleep 3000 ...

星号以下的代码另存为1.vbs,打开D:\1.exe后5秒按回车 ************************************* Dim Shell Set Shell=WScript.CreateObject("WScript.Shell") Shell.Run "D:\1.exe" WScript.Sleep 5000 Shell.SendKeys "{ENTER}"

发送按键时,有些时候需要先激活指定窗口后,才能正常发送相关按键。 mshta vbscript:CreateObject("Wscript.Shell").AppActivate("指定窗口")(window.close)这是激活指定窗口的。 我这边测试浏览器窗口,可以激活,但不知道为什么发送F11全屏没...

Set oScrShell = WScript.CreateObject("WScript.Shell") oScrShell.sendkeys "^{ESC}" ‘发送Windows键 其他: BACKSPACE{BACKSPACE}, {BS}, or {BKSP} BREAK{BREAK} CAPS LOCK{CAPSLOCK} DEL or DELETE{DELETE} or {DEL} DOWN ARROW{DOWN} END{...

Set ws=CreateObject("wscript.shell") ws.run "需要点击的网页的网址" wsh.sleep 1000 n=打开网页后只用tab键,选中“学习平台(必修)”这一项所需的次数 For i=1 To n ws.sendkeys "{tab}" next ws.sendkeys "~" 下面这个例子,用记事本保存为vbs...

set WshShell = CreateObject("WScript.Shell") WshShell.SendKeys "^R" 对于需要与Shift、Ctrl、Alt三个控制键组合的按键,SendKeys使用特殊字符来表示 如图所示

Set Wshell=CreateObject("WScript.Shell")Wshel.SendKeys {F1} '发送F1'其它的类似'VBS不能发送WIN这个键。只能用组合键代替Wshel.SendKeys "{CTRL}+{ESC}"

这个问题还真是一个费力的事 ,确实这个需要用到api 思路很简单 首先要捕获按下的按键,然后按下按键,两部分都要用到API 提供点参考 1 关于vbs 对 API 的调用,可以参考 http://hi.baidu.com/jimmy_314/item/e1190a51e38c6cbcadc857b1 2 关于按...

好像没说清楚,是想让vbs模拟人按键吗?还是每10秒钟要求别人按一次R?

网站首页 | 网站地图
All rights reserved Powered by www.mshd.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com