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

مشاهدة النسخة كاملة : دروس الفيجوال بيسك-تصميم برامج (1-4)

الفــــــوزان
24-02-2002, 09:10 PM
دروس الفيجوال بيسك-تصميم برامج (1-4)
نبدا بمشيئة الله بدروس تخص برنامج الفيجوال بيسك
كسلسله متتابعه في تصميم برامج خفيفه ذات استخدام معتاد
حيث ان الكثير يرى انه من الصعوبه ان يعمل الشخص ولو بريمج صغير
غير انه خلاف ذلك فهي بدايه الى التوسع واكتساب المعرفه في هذا المجال
وهنا اليوم نبدا بتصميم برنامج (التحويل الفهرنهايتي)لتحويل درجات الحراره
==============================
*اولا/
كود او شفرة البرنامج وهي كالتالي//
Private Sub Command1_Click()
Dim m
m = Text1.Text
Text2.Text = (9 / 5 * m) + 32
End sub


*ثانيا/
طريق التصميم //
انشاء مربعي نص textbox
الاول / الادخال العدد
الثاني / لاخراج الناتج
انشاء زر الامرcommandbutn وتسميته (تحويل) ومن ثم الضغط عليه مرتين وكتابة الكود
السابق



*ثالثا/

قم بحفضه البرنامج
وهذه هي صورة للبرنامج كما صممته لا يستغرق دقيقتين

وسوف نتابع لاحقا عرض برامج اخرى كمثل برنامج حساب الزكاه والحسابات المختلفه








تحياتي
الفــــــوزان
24-02-2002, 09:13 PM
وهذه هو البرنامج جاهز للتحميل
~ مســـــيو ~
25-02-2002, 12:00 AM
هلا أخوي الفوزان

أشكرك على الجهد الرائع اللي تقدمه للأعضاء شبكة المقهى العربي


وبالصراحه انت تعتبر مكسب كبير لنا وياليت تستمر معانا :)


بالنسبه للكود وين المفروض ننسخه ؟

يعني ممكن في أي برنامج تحرير ولا كيف لأني بالصراحه مافهمت

(shy)

وبالنسبه لمربعي النص كيف يتم انشائهما ؟


بأي برنامج ؟

تحياتي لك
الفــــــوزان
25-02-2002, 12:57 AM
اهلا مشرفنا العزيز

اشكرك على مشاعرك نحونا

طبعا ذا كله بواسطة برنامج الفيجوال بيسك وعندما تطبق البرنامج
ترى انه من اسهل الاشياء

فالكود بعد تصميمك للنموذج تحتاج الى اضافة زر الامر كمثل تحويل في

البرنامج وعند الضغط عليه مرتين سوف يظهر لك محرر الكود كلما
عليك هو وضع الكود ابتداء من امر المصفوفه dim بعد ذلك طبقت البرنامج وفعلت بين الز والنقر عليه



ومربع النصtextbox تجده من ضمن شريط الادوات في البرنامج عند الضغط عليه تبداء بتكوين المربع وتحديد مساحته ومعروف ان مربعات النص هي قيم لللادخال او الاخراج ففي البرنامج المربع الاول لادخال قيمة العدد والاخر لاضهار النتيجه


وهنا شرح مفصل للكود
Private Sub Command1_Click() ==> موجود في المحرر مباشرة


Dim m ==> واسم المصفوفه هو m والمصفوفه تاخذ الداله dim


m = Text1.Text ==> هنا قيمة المصفوفه تعني ادخال العدد في المربع الاول


Text2.Text = (9 / 5 * m) + 32 وهنا التحويل وهو لب البرنامج

فالدرجه m تضرب في 9 وتقسم على 5 لانه قانون ثابت للتحويل


End sub نهاية الكود:D
~ مســـــيو ~
25-02-2002, 03:20 AM
معلومات غزيره أخي الفوزان مشاءالله عليك :)



على فكره للي متابع الوضع هذا هو رابط الفيجيوال بيسك

هذا الاصدار السادس من الفيجوال بيسك حجمه 130ميقا
http://www.newhua.com/down/vs6sp5.exe


وهنا التعريب (http://www.arabteam2000.com/prog/badwi/vbArabic.EXE)
القهوجي
26-02-2002, 04:45 PM
مشكور الفوزان على ها البرامج الرائعه والله انا كنت ادور هالمواضيع من زمان لا كن جابك الله الله يعينك علي على الايميل
م ش ك و ر
المهندس
26-02-2002, 06:08 PM
thank yuo يالفوزان تصدق من زمان عندي البرنامج ذا ولااعرف وشله
لكن كل شي ماشي تمام بس الوان الخلفيه والحط كيف وايظا كيف اجعله بنفس المرفق بالحفظ لانه في خمسة انواع حفظ؟
الله يعنيك علي لكن تحمل شوي
wawa
26-02-2002, 07:10 PM
مشكور جدا اخوي الفوزان على هذا الشرح الوافي الكامل

ونامل منك المزيد

وانشالله انشوفك دكتور قد الدنيا
الفــــــوزان
26-02-2002, 10:16 PM
MR.XXاو القهوجي مشكورين حبايبي

اما الاخ المهندس/
الوان الخلفيه والخط تجدها من ضمن شريط خصائص الفورم فالباك

والفونت كلور يمكنك التحكم في الالوان على مزاجك

واما الحفظ فطبعا انضر الى اخر الاوامر save exe اي على صورة ملف تشغيلي
اي اوامر ثانيه



وبمشيئة الله سوف نعرض برنامج اخر لكي تتضح الامور اكثر
™ABUSAIF
27-02-2002, 08:44 AM
يعطيك ألف عافية اخوي الفوزان (good1)

واصل بارك الله فيك


تحياتي ،،
reema
27-02-2002, 10:35 AM
الفوزان الله يعطيك الف عافية ....... (good1) (good1)
الفــــــوزان
01-03-2002, 03:32 PM
تسلمووووو جميعا اريد تنبيهكم الى ان الدرس الثاني قد تم نشره

ومشكورين على المتابعه والاهتمام
تحياتي لكم جميعا
مـازن
12-03-2002, 07:32 PM
يعطيك ألف عافيه أخوي .. :)
واستمر ونحن نعضدك ... وإذا احتجت مساعدة حاضرين
" بس لو إنك متدرج معاهم شوي كان أحسن :) "
أنا بتكفّل بدرس ثاني :) وبتبّع نفس أسلوب شرحك :)
~ مســـــيو ~
13-03-2002, 04:03 AM
مشكور يامازن ونحن في انتظارك :)
الدوسـ7ـري
13-03-2002, 01:10 PM
الف شكر عزيزي الفوزان علي هذا المجهود والشرح الطيب وما قصرت ...

بالنسبة للأخ المهندس هذا الشرح راح يفيدك ويفيد الجميع :)

http://d1d.net/1/arts/abenrdhan/18.gif

تحياتي للجميع :)
™ABUSAIF
13-03-2002, 03:38 PM
بارك الله فيكم على الاضافة(good1)

تحياتي ،،
الفــــــوزان
13-03-2002, 10:10 PM
مشكور اخي ابن ردهان على التوضيح
واخ مازن انشالله اتكون بداية حير وتعاون في ما يخص هذا الموضوع على الرغم انه لو اردنا ان نشرح فيما يتعلق بالفيجوال لاخذ اكثر مواضيع لكن احبننا عرضه باسلوب مبسط بعيدا على التعقيد وكجذب نحو البرنامج حيث انه لدى الكثير فكره خاطئه عن الفيجوال بيسك من حيث الصعوبه وغيرها من الكلام.
فطبعا عند التعود على الاستحدام قد يجد البعض بعض المعوقات فنحن بصدد اجابة اي استفسار ول ذلك
heshamelnady
06-04-2002, 01:27 AM
السلام عليكم ياأخوان بارك الله فيكم والله انا لاأعرف شئ عن هذا البرنامج ولكنى بعد العرض المبسط لأخى الفوزان أشتقت ان اتعلمه وقد بدأت تنزيل البرنامج من وصلت أخى ~ مســـــيو ~ ولكن امامى 10 ساعات حتى يتم التحميل , وأدعوا الله ان يجعل هذا الجهد فى ميزان حسناتكم .
heshamelnady
06-04-2002, 04:13 PM
ارجو المساعدة ياأخوان فبعد الأنتظار 16 ساعة لتحميل الفيجوال بيزيك لم يعمل معى مع العلم ان الويندوز عندى XP PRO وقد وضعت فى المرفقات الصور التى تظهر عند تشغيل السيت أب
الفــــــوزان
06-04-2002, 07:44 PM
اخ
heshamelnady
شاكرين لك اهتمامك بهذا البرنامج وانشالله تجد ماستفيد منه
اما بالنسبه الى
نسخة الفيجوال بيسك من الافضل الاعتماد في تنزيلها على الجهاز من الاسطوانات المتوفره بالاسواق لانه كما يبدو ان هناك ملف معطوب او ناقص بالرغم من اني لم اطلع على المرفقات ووضحت لك ذلك
لكن لاتقلق انشالله بسيطه
الشيماء
06-04-2002, 07:52 PM
يعطيك العافيه الفوزان
كما عهدناك ..... ابداعات متزايده
وبقولك ان شرحك وافي وايد وعلى الله نشوف اكثر واكثر
ستـStyleـايل
09-04-2002, 10:42 PM
يعطيك العافيه الاخ الفوزان
شرح كافي 0000 نامل المزيد من هذه البرامج المفيده وبانتظار خبراتك.
mimi
11-04-2002, 01:21 AM
مرحبا .....

يعطيكم العافيه .....
اخ الفوزان ...
اخ بن ردهان ... كان هالاسم مر علي :D

تحياتي ...
الفــــــوزان
11-04-2002, 01:52 AM
الاخوه/
الشيماء ساده mimi

شكرا على التعقيب