Visual Basic - apagar el equipo desde visualbasic

requiero el codigo para apagar el equipo desde una aplicacion hecha en visual basic

Alli te mande una aplicacion espero te sirva

Fabian, si no te importa enviarmelo.. yo tambien estaba buscando algo igual. Muchas gracias.

Lamento decirte que el codigo lo tengo en mi trabajo y no ire alla hasta el lunes, si deseas te lo mando ese dia , aunque esa aplicacion lo baje de esta pagina en la seccion codigo fuente.
Suerte

Fijate con esto:

Const EWX_LOGOFF = 0
Const EWX_SHUTDOWN = 1
Const EWX_REBOOT = 2
Const EWX_FORCE = 4

Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long

ExitWindowsEx EWX_FORCE Or EWX_REBOOT, 0