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

مشاهدة النسخة كاملة : دروس للمبتدئين بالفبجوال بيسك

أبو يزيد
10-09-2002, 12:24 AM
السلام عليكم ..
ربنا يعينكم على مع أول برنامج أشرحة بلغة الفيجوال بيسك وهو عبارة عن آلة حاسبة يمكنك تحميلها من هذا الرابط .
http://www.geocities.com/aboyzed2000/HASEBAH.zip
الان نبدأ الشرح خطوة خطوة والبركة فيكم تساعدوني شوي ..
أولا ///لازم يكون عندك برنامج فيجوال بيسك 6 ..وتحصلة عند أقرب محل لللكمبيوتر بــ 10 ريال ""يابلاش ""
وهذه صورة البرنامج مع المرفق
أبو يزيد
10-09-2002, 12:25 AM
ثالثا// افتح البرنامج
واتبع مافي الصورة
أبو يزيد
10-09-2002, 12:26 AM
رابعا // سيفتح لك الفورك fourm وهو اللي عليه شغلنا كله ..
في البرنامج على اليسار مستطيل يسمى ""مستطيل الأدوات ""
وعلى اليمين مستطيل يسمى مستطيل الخصائص..
كما في الصورة
أبو يزيد
10-09-2002, 12:27 AM
وهذا بتاع الخصائص وهو مهم جدا هو ومستطيل الأدوات
أبو يزيد
10-09-2002, 12:28 AM
الان نبدا الشغل ..
اضف 3 TEXT تحصلها على اليسار في مستطيل الادوات كما في الصورة المرفقة السابقة ""زر TEXT"
ملحوظة //الاضافة تتم عادي بالنقر والرسم على اللوحة الفورم FORUM
تضيف 4 كوماندCOMMAND ايضا تحصلها في الادوات يسار كما فعلت في الــ text
كما في الصورة المرفقة طبعا لك حرية الترتيب
أبو يزيد
10-09-2002, 12:30 AM
طبعا راح تكون بدل الكتابة اللي على ommand1 علامة ""+""او اي علامة
اتبع الموجود بالصورة لتغيير الكتابة من كوماند الى اي علامة حسابية
أبو يزيد
10-09-2002, 12:31 AM
الان خلصنا من التصميم باقي علينا كتابة الأكواد أو مايسمى بالاوامر ..
انتبه طريقة كتابة الاكواد اساسها واحد وعي تتبع النمط التالي وستتعرف عليها لاحقا::
اسم الاداة.اسم الخاصية =""الصيفة ""
كيف تتم كتابة الامر او الكود ..ركز زين هذا اهم شي
طبعا نحن الان نريد ان نقول :
عند ضغط المستخدم على زر +(كوماند1) يقوم البرنامج بجمع الــtext1 مع الــtext2 ويجعل ناتجهما في text3
اذا اين نكتب هذا الكلام ""طبعا مو بالعربي ""
اتبع الاتي قم بالنقر المزدوج على command1 والذي استبدلت كتابته بالعلامة+ صح والا نسيت ..
تطلع لك الصورة المرفقة شاهد الصورة وسنكمل
أبو يزيد
10-09-2002, 12:33 AM
طبعا ستكتب الامر التالي بين
Private Sub Command1_Click()

هنا

End Sub

ستكتب
<code>Text3.Text = Val(Text1.Text) + Val(Text2.Text)</code>
طبعا ياريت تقارن بين هذا الكود والكود اللي مع الصورة المرفقة لان اللي مع الصورة المرفقة هو الصحيح هنا ماادري ليش القوس جاء باول شي
عموما اعمل نفس الطريقة مع كوماند2 ولكن في الكود بدل علامة + حط × واللي بعدها حط÷ واللي بعدها حط - (على الكوماند وفي الكود يعني
كود الضرب راح يكون
Text3.Text = Val(Text1.Text) * Val(Text2.Text)
كود الطرح
Text3.Text = Val(Text1.Text) - Val(Text2.Text)
أبو يزيد
10-09-2002, 12:34 AM
انتهينا كذا لكن لاتنس أنه ""لايأس مع الحياة ولاحياة مع اليأس ",انا بانتظار اي سؤال
الان باقي عليك تجرب البرنامج من خلاال الضغط على f5 الو كما في الصورة المرفقة ..
ملحوظة انتبه للقوس اللي مازبط معاي في الكود
Text3.Text = Val(Text1.Text) - Val(Text2.Text)
القوس اللي بالاحمر خله بعد text2.text مغلقا ..
الى اللقاء وآمل انكم قد الثقة وتساعدوني لنجاح هذا الشرح
تحياتي لكم جميعا
أبو يزيد
10-09-2002, 12:35 AM
طبعا بعد ماينجح التطبيق راح نروح لعملية الالوان اللي في برنامجي هذا وترى الامر سهل جدا ..
القاكم على خير
Nay
06-07-2003, 04:10 PM
:eek::eek:

ٍسهل مررررره tongue

يسلمو ابو يزيد bigok
أبو يزيد
06-07-2003, 10:34 PM
tongue هذا ماأتمناه