Muestra la pantalla de apagar el sistema...
Option Explicit
Private Declare Function SHShutDownDialog Lib "shell32" Alias "#60" (ByVal YourGuess As Long) As Long
Private Sub Form_Load()
SHShutDownDialog 0
End Sub
Posted
mié, abr 26 2000 22:47
by
Maverick