وجدتها اخى اكتب هذه الداله
Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long Dim Ilog, IRes, IShut As Long
وهذه الكود لايقاف تشغيل ويندوز
IShut = ExitWindowsEx(1, 1)
وهذا الكود لتسجيل الخروج
Ilog = ExitWindowsEx(4, 1)
وهذا الكود لاعاده التشغيل
IRes = ExitWindowsEx(2, 1)
ارجوا ان اكون قد افدتك اخى
"خيركم من تعلم العلم وعلمه"






