★★★简单问题送高分★★★:为何下列sendkeys语句不起作用?
deak 2001-06-06 02:23:00 Private Declare Function ShutDownDialog Lib "shell32" Alias "#60" (ByVal YourGuess As Long) As Long
Dim ret As Long
Dim Flags As Long
Flags = EWX_SHUTDOWN
If Force Then Flags = Flags + EWX_FORCE
If IsWinNT Then EnableShutDown
ShutDownDialog 2&
SendKeys "{ENTER}", True
导致不能自动关机