Private Sub Command1_Click()
Call CreateObject("Shell.Application").MinimizeAll
End Sub
超级简单了。。。
转载于:https://www.cnblogs.com/it201108/archive/2008/10/30/2148130.html
转载于:https://www.cnblogs.com/it201108/archive/2008/10/30/2148130.html