Hel*_*len 11
您可以使用该SendKeys方法将Alt+ F4快捷方式发送到要关闭的窗口.此窗口此时必须处于活动状态,因此您还需要在此AppActivate之前调用SendKeys.
基本上,你需要这样的东西:
Set oShell = CreateObject("WScript.Shell")
oShell.AppActivate "Untitled - Notepad"
oShell.SendKeys "%{F4}"
Run Code Online (Sandbox Code Playgroud)
您可能希望添加检查和小延迟,以使您的脚本更加万无一失:
Set oShell = CreateObject("WScript.Shell")
If oShell.AppActivate("Untitled - Notepad") Then
WScript.Sleep 500
oShell.SendKeys "%{F4}"
End If
Run Code Online (Sandbox Code Playgroud)
编辑:(您对VBScript资源的评论/问题的答案.)
我已经编译了一些指向VBScript网站和资源页面的链接,我希望它们会有所帮助:
学习
参考
其他资源
至于俄语中的VBScript资源,请查看script-coding.info和Серыйфорум - 这里有很多有用且有趣的例子.另外,请查看此主题,其中包含许多VBScript资源的链接,包括俄语版本的资源.
| 归档时间: |
|
| 查看次数: |
26062 次 |
| 最近记录: |