RE:codigo en visual basic para apagar el computado
Publicado por
Ricardo Suazo (1 intervención) el 17/10/2007 01:42:15
HOLA
ESPERO QUE ESTO TE SIRVA:
'--------------------------ESTO VA EN UN MODULO BAS----------------
'declaramos una constante y la api correspondiente.
Private Const EWX_SHUTDOWN As Long = 1
Private Declare Function ExitWindowsEx Lib "user32" (ByVal dwOptions As Long, ByVal dwReserved As Long) As Long
' -------------ESTO VA EN EL FORMULARIO
Private Sub Command1_Click()
lngResult = ExitWindowsEx(EWX_SHUTDOWN, 0&)
End Sub
'----- si tienes elguna duda o necesitas saber algo mas mi correo es:
ricardo-suazo@hotmail.com