[讨论]>>................
为什么通不过？
Private Sub Command1_Click()
ExitWindowsEx &H43, 0
End Sub
Private Sub Form_Load()
Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
End Sub
我放在Form1中也不好用