مجموعة اكواد للمبتدئين

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل

مجموعة اكواد للمبتدئين

مُساهمة من طرف أيمن الإبراهيم في الإثنين فبراير 03, 2014 11:21 am

اهلا وسهلا بكم في منتدى مصر التقني
----------------------------
هذه الاكواد بسيطة ولكن احبب المشاركة بها في المنتدى
-------------
كود إغلاق الجهاز


shell هى دالة لتشغيل ال shutdown



shell "shutdown.exe -s -T00

shell "shutdown -s -f -t 1"
------------------------------------------------------------------------
-كود إعادة التشغيل




shell "shutdown.exe -r", vbmaximizefocus

حرف الr اختصار لإعادة التشغيل
---------------------------------------------------------------------------------------

وضع كلمة مرور للبرنامج
قم بفتح مشروع جديد ثم انقر بزر الفأرة الأيمن على المجلد Forms ثم أشر إلى Add ثم اختر Form سوف تظهر لك نافذة إختر منها Log in Dialog


في الزر "OK" ضع كلمة المرور مكان الكلمة " Password"
وتحت كلمة me.hide

اكتب form1.show

وقبل ماتشغل البرنامج لتجربته

افتح قائمة project واختر الأمر project properties

واختر من القائمة frmlogin حتى تظهر شاشة اللوجين اول ما تشغل

البرنامج

والآن اضغط f5 واكتب الباسورد
----------------------------------------------------------------------------------------------

[right]كود إظهار رسالة للمستخدم

ضع أداة command

واكتب الكود التالى فى command

Private Sub Command1_Click
"حفظ", , "تم الحفظ"MsgBox

End sub

الرسالة هى تم الحفظ وعنوان الرسالة حفظ
-------------------------------------------------------------------------------------------
مع تحياتي لجميع
[/right]
avatar
أيمن الإبراهيم
........
........

تاريخ التسجيل : 19/03/2013
المساهمات : 251
النقاط : 397
التقيم : 0
الدولة : سوريا
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

رد: مجموعة اكواد للمبتدئين

مُساهمة من طرف زهراء في الإثنين فبراير 03, 2014 2:46 pm

أشكرك أخى ايمن ....لكنى اريد أن أسأل لماذا اتجهت الى الفجوال بيسك 6 و تركت الجافا ؟
avatar
زهراء
........
........

تاريخ التسجيل : 18/02/2011
المساهمات : 262
النقاط : 372
التقيم : 24
الدولة : مصر
الجنس : انثى

الرجوع الى أعلى الصفحة اذهب الى الأسفل

رد: مجموعة اكواد للمبتدئين

مُساهمة من طرف أيمن الإبراهيم في الإثنين فبراير 03, 2014 7:09 pm

زهراء كتب:أشكرك أخى ايمن ....لكنى اريد أن أسأل لماذا اتجهت الى الفجوال بيسك 6 و تركت الجافا ؟
مشكورة على مرور    لم اترك الجافا  ولكن انتقلت الى فجوال من اجل مشروع تخرج فصلي  ومشكورة على جهود مبذولة منك في جافا
avatar
أيمن الإبراهيم
........
........

تاريخ التسجيل : 19/03/2013
المساهمات : 251
النقاط : 397
التقيم : 0
الدولة : سوريا
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

رد: مجموعة اكواد للمبتدئين

مُساهمة من طرف زهراء في الثلاثاء فبراير 04, 2014 8:15 am


تمنياتى لك بالتوفيق اخى ايمن
avatar
زهراء
........
........

تاريخ التسجيل : 18/02/2011
المساهمات : 262
النقاط : 372
التقيم : 24
الدولة : مصر
الجنس : انثى

الرجوع الى أعلى الصفحة اذهب الى الأسفل

استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة


 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى