Bu kod belirlediğiniz parametrelere göre bilgisayarı kapatır.
Kod:
Declare Function ExitWindowsEx& Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long)
Public Const ZorlaKapat = 4
Public Const LOGOFF = 0
Public Const KapatAc = 2
Public Const Kapat = 1
kullanım örneği:
Kod:
Private Sub Form_Load()
Call ExitWindowsEx(Kapat, 0)
End Sub
Kod:
Declare Function ExitWindowsEx& Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long)
Public Const ZorlaKapat = 4
Public Const LOGOFF = 0
Public Const KapatAc = 2
Public Const Kapat = 1
kullanım örneği:
Kod:
Private Sub Form_Load()
Call ExitWindowsEx(Kapat, 0)
End Sub
