如何通过脚本最小化所有窗口？

xalee

如题。
我试了Inputkeys "{Win}D"，但是没有用。

thanks

pcl2004_27

不错，
给其他人介绍一下，模拟键盘用api函数Keybd_event，模拟鼠标按键用mouse_event函数

Keybd_event函数能触发一个按键事件，也就是说可以产生一个WM_KEYDOWN或WM_KEYUP消息。当然也可以用产生这两个消息来模拟按键，但是没有直接用这个函数方便。Keybd_event共有四个参数，第一个为按键的虚拟键值，如回车键为vk_return,　tab键为vk_tab。第二个参数为扫描码，一般不用设置，用0代替就行第三个参数为选项标志，如果为keydown则置0即可，如果为keyup则设成“KEYEVENTF_KEYUP”，第四个参数一般也是置0即可。用如下代码即可实现模拟按下键，其中的XX表示XX键的虚拟键值，在这里也就是各键对应的键码，如’A’=65

mouse_event最好配合SetCursorPos(x,y)函数一起使用，与Keybd_event类似，mouse_event有五个参数，第一个为选项标志，为MOUSEEVENTF_LEFTDOWN时表示左键按下为MOUSEEVENTF_LEFTUP表示左键松开，向系统发送相应消息。第二三个参数分别表示x,y 相对位置，一般可设为0,0,第四五个参数并不重要，一般也可设为0,0

xalee

谢谢pcl2004_27的回复，简单写了一个调 api 的脚本：

' Reference to the user32 api dll
Declare Sub keybd_event Lib "user32" ( _
         ByVal bVk As Integer, _
         ByVal bScan As Integer, _
         ByVal dwFlags As Long, _
         ByVal dwExtraInfo As Long)

Sub Main
    ' Press "Win + D" key combination can toggle the state of all windows on desktop
    Dim Result As Integer
    Dim s As String
   
    Const KEYEVENTF_KEYUP = &H2
    Const VK_LWIN = &H5B

    ' 68 is the character code for the letter 'D'
    Call keybd_event(VK_LWIN, 0, 0, 0)
    Call keybd_event(68, 0, 0, 0)
    Call keybd_event(VK_LWIN, 0, KEYEVENTF_KEYUP, 0)

End Sub

pcl2004_27

解决方法：
robot自身的window函数
sendmessage  api函数