شفرة إعادة تشغيل الوندوز
هذه الشفرة توضع في منطقة التصريح
كود:
Const EWX_SHUTDOWN = 1
Const EWX_REBOOT = 2
Const EWX_LOGOFF = 0
Const EWX_FORCE = 4
Private Declare Function ExitWindowsEx Lib "user32" _
(ByVal uFlags As Long, _
ByVal dwReserved As Long) _
As Long
هذه الشفرة توضع في منطقة الكود
كود:
'cmdRestart اصنع زر تحكم باسم
Private Sub cmdRestart_Click()
'Restart Windows (works on Windows 95/NT)
ExitWindowsEx EWX_LOGOFF, 0
على فكرة مش انا إلي كاتب الأكواد هذي
شوف المرفقات فيها عدد من الأكواد الأخرى