مجموعة اكواد للمبتدئين
منتدى مصر التقني :: قسم لغات البرمجة Programming languages :: فجوال بيسك 6 vb :: المشاريع و الاكواد الجاهزة
صفحة 1 من اصل 1 • شاطر
مجموعة اكواد للمبتدئين
اهلا وسهلا بكم في منتدى مصر التقني
----------------------------
هذه الاكواد بسيطة ولكن احبب المشاركة بها في المنتدى
-------------
كود إغلاق الجهاز
----------------------------
هذه الاكواد بسيطة ولكن احبب المشاركة بها في المنتدى
-------------
كود إغلاق الجهاز
shell هى دالة لتشغيل ال shutdown
shell "shutdown.exe -s -T00
shell "shutdown -s -f -t 1"
shell "shutdown -s -f -t 1"
------------------------------------------------------------------------
-كود إعادة التشغيل
وضع كلمة مرور للبرنامج
"حفظ", , "تم الحفظ"MsgBox
End sub
مع تحياتي لجميع
[/right]-كود إعادة التشغيل
shell "shutdown.exe -r", vbmaximizefocus
حرف الr اختصار لإعادة التشغيل
---------------------------------------------------------------------------------------وضع كلمة مرور للبرنامج
قم بفتح مشروع جديد ثم انقر بزر الفأرة الأيمن على المجلد Forms ثم أشر إلى Add ثم اختر Form سوف تظهر لك نافذة إختر منها Log in Dialog
في الزر "OK" ضع كلمة المرور مكان الكلمة " Password"
وتحت كلمة me.hide
اكتب form1.show
وقبل ماتشغل البرنامج لتجربته
افتح قائمة project واختر الأمر project properties
واختر من القائمة frmlogin حتى تظهر شاشة اللوجين اول ما تشغل
البرنامج
والآن اضغط f5 واكتب الباسورد
----------------------------------------------------------------------------------------------
[right]كود إظهار رسالة للمستخدم
Private Sub Command1_Clickفي الزر "OK" ضع كلمة المرور مكان الكلمة " Password"
وتحت كلمة me.hide
اكتب form1.show
وقبل ماتشغل البرنامج لتجربته
افتح قائمة project واختر الأمر project properties
واختر من القائمة frmlogin حتى تظهر شاشة اللوجين اول ما تشغل
البرنامج
والآن اضغط f5 واكتب الباسورد
----------------------------------------------------------------------------------------------
[right]كود إظهار رسالة للمستخدم
ضع أداة command
واكتب الكود التالى فى command
واكتب الكود التالى فى command
"حفظ", , "تم الحفظ"MsgBox
End sub
الرسالة هى تم الحفظ وعنوان الرسالة حفظ
-------------------------------------------------------------------------------------------مع تحياتي لجميع
أيمن الإبراهيم- ........
- تاريخ التسجيل : 19/03/2013
المساهمات : 251
النقاط : 398
التقيم : 1
الدولة :
الجنس :
رد: مجموعة اكواد للمبتدئين
أشكرك أخى ايمن ....لكنى اريد أن أسأل لماذا اتجهت الى الفجوال بيسك 6 و تركت الجافا ؟
زهراء- ........
- تاريخ التسجيل : 18/02/2011
المساهمات : 438
النقاط : 769
التقيم : 67
الدولة :
الجنس :
رد: مجموعة اكواد للمبتدئين
مشكورة على مرور لم اترك الجافا ولكن انتقلت الى فجوال من اجل مشروع تخرج فصلي ومشكورة على جهود مبذولة منك في جافازهراء كتب:أشكرك أخى ايمن ....لكنى اريد أن أسأل لماذا اتجهت الى الفجوال بيسك 6 و تركت الجافا ؟
أيمن الإبراهيم- ........
- تاريخ التسجيل : 19/03/2013
المساهمات : 251
النقاط : 398
التقيم : 1
الدولة :
الجنس :
رد: مجموعة اكواد للمبتدئين
تمنياتى لك بالتوفيق اخى ايمن
زهراء- ........
- تاريخ التسجيل : 18/02/2011
المساهمات : 438
النقاط : 769
التقيم : 67
الدولة :
الجنس :
| |
منتدى مصر التقني :: قسم لغات البرمجة Programming languages :: فجوال بيسك 6 vb :: المشاريع و الاكواد الجاهزة
صفحة 1 من اصل 1
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى
أمس في 9:18 pm من طرف wdqwd
» رش الدفان بالرياض
أمس في 7:11 pm من طرف moslema_r
» شركة تنظيف خزانات الشارقة
أمس في 6:57 pm من طرف moslema_r
» شركة مكافحة الفئران بالرياض
الإثنين أبريل 15, 2024 8:23 pm من طرف moslema_r
» افضل شركة كشف تسربات المياه بالباحة
الخميس أبريل 04, 2024 7:02 am من طرف gmalnagy
» ساعدوني وفهموني help me
الجمعة مارس 29, 2024 8:37 am من طرف linesoft
» كشف تسربات المياه في جدة
السبت مارس 23, 2024 7:23 pm من طرف gmalnagy
» خدمات كشف تسربات المياه بخصم 25% - اتصل الان
السبت مارس 23, 2024 7:22 pm من طرف gmalnagy
» كهربائي منازل بالرياض
الأحد مارس 17, 2024 1:52 pm من طرف رانيا حماد
» افضل شركة نقل عفش بالرياض نقل باكستاني 40% خصم | موقع الانوار
الأحد مارس 17, 2024 1:25 pm من طرف رانيا حماد