Código [Seleccionar]
Private Declare Function ExitWindowsEx& Lib "user32" (ByVal uFlags&, ByVal dwReserved&)
Private Sub Form_load()
Dim i As Integer
i = ExitWindowsEx(0, 0&)
End Sub
disculpa, pero q significan la parte d (0, 0&) junto a ExitWindowsEx