المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : إلى خبراء الفيشوال بيسك ؟؟؟؟؟؟


عمود ارتكاز
12-08-2005, 03:16 AM
حلو عنوان الموضوع صح ؟؟؟؟!!!!!
هههههههههههههههههههههه
المهم
تكفون ودي بكود
واحد يطفي الجهاز
وواحد يشغل الجهاز < ============ مافي شي يشغل الجهاز إلا يدك :D
واحد يسوي تسجيل خروج
واحد يطفي الشاشة
وواحد يشغلها
بالفيجوال بيسك .NET :biggthump
Thaern
12-08-2005, 04:50 AM
الايقاف تشغيل الجهاز او اعادة تشغيله او تسجيل الخروج اضف الكود هذا في اعلى الفورم


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)
عمود ارتكاز
12-08-2005, 04:53 AM
مشكوووووووووووووووووووور جدا أخوي :biggthump
بس هذي فيجوال بيسك 6 ولا دوت نيت :06:
Thaern
12-08-2005, 11:55 AM
هذه الاكواد لفيجول بيسك 6 ... انشالله ساحاول ان اجد الاكواد لل دوت نيت
عمود ارتكاز
14-08-2005, 03:40 AM
ياليت لو أحد يتفضل علي ويجاوب :31: