إلى خبراء الفيشوال بيسك ؟؟؟؟؟؟

[عمود ارتكاز]

حلو عنوان الموضوع صح ؟؟؟؟!!!!!
هههههههههههههههههههههه
المهم
تكفون ودي بكود
واحد يطفي الجهاز
وواحد يشغل الجهاز < ============ مافي شي يشغل الجهاز إلا يدك
واحد يسوي تسجيل خروج
واحد يطفي الشاشة
وواحد يشغلها
بالفيجوال بيسك .NET

[Thaern]

الايقاف تشغيل الجهاز او اعادة تشغيله او تسجيل الخروج اضف الكود هذا في اعلى الفورم

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)

لاعادة تشغيل الجهاز ..اضف هذا الكود الى زر ..

IRes = ExitWindowsEx(2, 1)

لتسجيل الخروج ..اضف هذا الكود الى زر

Ilog = ExitWindowsEx(4, 1)

[عمود ارتكاز]

مشكوووووووووووووووووووور جدا أخوي
بس هذي فيجوال بيسك 6 ولا دوت نيت

[Thaern]

هذه الاكواد لفيجول بيسك 6 ... انشالله ساحاول ان اجد الاكواد لل دوت نيت

[عمود ارتكاز]

ياليت لو أحد يتفضل علي ويجاوب