دروس في الفيجوال بيسك ( الدرس الاول )

بسم الله الرحمن الرحيم 

اول درس انا عامله هيكون ازاي تعمل برنامج بسيط اوي وهو عباره عن لعبه بسيطه كدا 

زي لعبه بينجو لو تعرفوها ،، نتابع الشرح والصور ونشـوف كل حاجه 

الاول انا بشرح علي نسخه فيجوال بيسك 2005  لأن دي النسخه اللي عنـدي ومفيش فرق بينها وبين فيجوال 6 او 2008 كبير 

هنفتح الفيجوال بيسك 

ال ميعرفش بيتفتح منين نشرح الطريقه

start > all programs > microsoft visual ... 

وبعدين نضيف الحاجات التاليه في الفورم 

2 كوماند بتون " 2 buttons "

3 ليبل " 3 label "

1 بيكتشر بوكس " 1 picturebox "

ونرتبهم بالشكل ده 

(1)

نيجي للصوره الجايه عشان تعرفو تضيفو صوره للبيكتشر بوكس ازاي 

(2)

بعد كدا هيظهر الصوره الجايه دي 

(3)

تابع الصوره الجايه دي 

(4)

هنخلي الخصايه visible ل البيكتشر بوكس = false  واللي ميعرفش ازاي يشوف الصوره الجايه 

(5)

كدا احنا خلصنا نص المرحله باقي النص التاني اللي هوا الاكواد 

نشرح فكره البرنامج :- 

الهدف من البرنامج انك لما تضغط علي زرار " ابدأ " مكان الاصفار اللي فوق دي لو ظهر رقم " 7 " الصوره اللي في البيكتشر بوكس دي تظهر ولو مظهرش رقم ال "7" الصوره هتفضل  مختفيه ،، هنـا بقا بنحتاج الكود  عشان ننفذ الاوامر دي 

اضغط دابل كليك علي الزرار " ابدأ " ،،، زي الصوره الجايه دي 

(6)

بعد ما تدوس دابل كليك هينقلك علي صفحه الاكواد ،، شوف الصوره الجايه واكتب زيها 

(7)

وبعد ما تكتب الاكواد وكله تمام دوس علي " F5 " عشان تجرب البرنامج ولما تخلص احفظ المشروع ومبروك عليــك

والناس اللي مش فاهمه تقدر تحمل الشرح بالصور بالبرنامج بالاكواد

لتحميــل الشـرح :: اضغــط هنــا ::

Read More

برمج اّله حاسبه ( الدرس الثاني ) بالفيجوال بيزك

بسم الله الرحمن الرحيم

اهلا بيكم في ثاني درس من البرمجه بالفيجوال وهيكون عباره عن تصميم اّله حاسبه بسيطه تقدر تجمع - تضرب - تطرح - تقسم الارقام العمليات الحسابيه الاساسيه بمعني أصح وهيكون الشرح ان شاء الله علي فيجوال بيسك 2005 visual basic 2005 والبرنامج سهل في البرمجه وواضح وكله مشروح بالصور 


نبدأ بأول صوره نفتح الفيجوال بالطريقه دي ونختار كريت بروجكت " مشروع جديد "

 هنكتب اسم المشروع وندوس اوك

 هنغير اسم الفورم من الخاصيه المتوضحه في الصوره وهي ال text ونكتب زي الصوره السابقه

هنخلي شكل الفورم كالتالي الا وهو

• اضافه TextBox عدد ثلاثة صناديق نص
• واحد صندوق مجموعات groupbox 
• 4 ازرار راديو بوتون وندخلهم في الجروب بوكس كما الشكل

• عدد 3 ليبلات كما الشكل  

 نشرح الارقام الموجوده في الصوره السابقه

رقم 1 : التيكست بوكس واللي هيتم كتابه الرقم الاول فيه

رقم 2 : الراديو بوتون وهو زر المعالجه او العمليه اللي هنقوم بيها ونقدر نختار من ضرب او طرح او قسمه او جمع

رقم 3 : الجروب بوكس واللي غيرنا خاصيه التيكست الخاصه به الي المعاملات

رقم 4 : الليبل   

قم بضبط الخصائص كالتالي:

لليبلات نحدد الليبل ونختار من الخصائص كلمه text ونعدلها بالترتيب:
للأول "الرقم الأول"، وللثاني "الرقم الثاني"، وللثالث "النتيجة" 

لصندوق المجموعات نحدده ونختار خاصيه ال text ونخليها المعاملات

لأزرار الراديو كالتالي نختار من الخصائص كلمه text ونعدلها بالترتيب: الأول "الجمع"، الثاني "الطرح"، الثالث"الضرب"، الرابع "القسمة". بعد التصميم وتعديل الخصائص سيكون الفورم مثل الشكل السابق

الأن انتيهنا من مرحله التصميم اي قطعنا نصف المسافه للانتهاء من البرنامج ..

باقي مرحله الاكواد وللتعرف عليها ارجع للدرس الاول من هنا

وسيتم التكلم عنها في درس قادم خاص بها ان شاء الله 

الأن نضغط دابل كليك علي الراديو بوتون المسمي الجمع لنذهب الي منطقه الكود الخاصه به ونكتب الكود ده 

Dim x, y As Double
        x = TextBox1.Text
        y = TextBox2.Text
        TextBox3.Text = x + y    

تابع الصوره

 نشرح الكود اللي كتبناه :) 

•  السطر ده
• Dim x, y As Double
• احنا عرفنا متغيرين , يعني ايه متغيرين هقولك يعني زي س ص في الرياضه وبنمهد للبرنامج اننا هنكتب المتغيرين دول = ايه ف الفورم ال صممناه
• السطر ده
•         x = TextBox1.Text
• بنقول للبرنامج اننا عرفنا المتغير x ب انه = التيكست بوكس 1 اللي هوا الرقم الاول
•    
•  السطر ده 
•         y = TextBox2.Text
• بنقول للبرنامج اننا عرفنا المتغير y ب انه = التيكست بوكس 2 اللي هوا الرقم الثاني في الفورم
•  
•  السطر ده
•         TextBox3.Text = x + y     

• بنقول للبرنامج ان التيكست بوكس 3 اللي هو النتيجه = القيمه الموجوده في التيكست بوكس1 + التيكست بوكس2

بعد كدا دابل كليك علي زرار الطرح ونكتب الكود التالي
Dim x, y As Double
x = TextBox1.Text
y = TextBox2.Text
TextBox3.Text = x - y

والكود ده لزرار الضرب
Dim x, y As Double
x = TextBox1.Text
y = TextBox2.Text
TextBox3.Text = x * y

والكود ده لزرار القسمه

Dim x, y As Double
 x = TextBox1.Text
y = TextBox2.Text
TextBox3.Text = x / y  

  

 

 كدا انتهينا من وضع الاكواد والبرنامج جاهز للتشغيل نضغط علي F5 في الكيبورد عشان نشغله هيشتغل معانا بالشكل الجاي ده ونقدر نجربه

 

 طبعا ده مش مقياس انك تعمل شكل الاله حاسبه نفس الشكل اللي انا عامله ولكن كل واحد وابداعه وذوقه 

فكره البرنامج سهله وبسيطه ويارب تكونو استفدتم وأي استفسارات او طلبات يرجي وضعها في التعليق بدون الخروج عن صلب الموضوع

لتحميل الصور والاكواد لأصحاب النت البطئ اضغط هنا

Read More