VBScript和Windows脚本宿主不提供用于最大化/最小化/恢复窗口的内部函数。没有任何第三方工具,您唯一的选择是使用
SendKeys
模拟键盘窗口系统菜单中相应命令的快捷方式。 要使活动窗口最大化,您可以模拟Alt + SpaceBar,x快捷方式:
Set oShell = CreateObject(“WScript.Shell”)
oShell.SendKeys “% x”
要最小化活动窗口,请使用Alt + SpaceBar,n:
Set oShell = CreateObject(“WScript.Shell”)
oShell.SendKeys “% n”
要恢复活动窗口,请使用Alt + SpaceBar,r:
Set oShell = CreateObject(“WScript.Shell”)
oShell.SendKeys “% r”
(请注意,此代码不适用于非英语Windows版本,其中Maximize / Minimize / Restore命令的名称已本地化,因此具有其他快捷方式。)