Bu kodla windowsu kapatabilirsiniz ama tamamen bir kapanma gerceklesmiyor
Private Declare Function ExitWindowsEx Lib "user32" (byval kod as integer, byval aa as integer)as integer
Private Sub Command1_Click()
ExitWindowsEx 0,0
End Sub
%magician%