تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] كم سؤال و استفسار و طلب رأي
#1
السلام عليكم و رحمة الله و بركاته 

اخواني انا من شوي سجلت لان المنتدى فيجوال بيسك و عجبني صراحة 

عندي كم استفسار 

انا بالمرحلة الثانوية 

و عندنا المنهج اليوم فيجوال بيسك و المشروع لازم نعمل فيه مشروع 

بصراحة بدي رايكم بمشروع و بدي صراحة مساعدتكم 

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

اعمل اول شي فريم انستول لتثبيت مثلا آلة حاسبة و كمان برنامج نصي و ممكن اضيف على الالة الحاسبة الاضافة الصوتية يعني اوامر صوتية 

ممكن يا شباب اذا عندكم شي مشاريع حلوة او ممكن تساعدوني ياريت تقلولي
الرد }}}}
تم الشكر بواسطة: احمد تيم
#2
وعليكم السلام ,, 


الله يوفقك يا اخي وتنجح في دراستك ان شاء الله ,, Big Grin


تفضل شرح عمل الالة الحاسبة , وان شاء الله تستفيدRolleyes




اول شيء افتح الفيجوال بيسك وانشىء مشروع جديد كما في الصورة


\
هذا مكان العمل 
وهذه هي الادوات


وهذا لاستعراص مكان البرنامج على الشاشة 


وهذه هي شاشات البرنامج


اذا اي مكون ناقص عندك بتقدر تضيفه من هذه القائمة 




الان ندخل بالمفيد , ضيف كلمة اضافة الرقم الاول نفس اللي بالصورة من خلال الضغط على حرف A الكبير على اليسار , وبعدين غير القيمة من اليمين على كلمة caption 






الان ضيف text box وهذا لادخال الرقم




كرر الخطوة 




الان ضيف هذه الازرار 






وهذه 




الان طبق الصورة التالية للدخول الى صفحة الكود 




اختار المفاتيح التي تريدها 






اضف Dim a, b, r as Integer
 في البداية


الان اضف هذا الكود عند الزر الاول 


Private Sub Command1_Click()
a = Val(Text1.Text)
b = Val(Text2.Text)
r = a + b
Text3.Text = r
End Sub




وهذا في الثاني 


Private Sub Command2_Click()
a = Val(Text1.Text)
b = Val(Text2.Text)
r = a - b
Text3.Text = r
End Sub




وهذا 


Private Sub Command3_Click()
a = Val(Text1.Text)
b = Val(Text2.Text)
r = a * b
Text3.Text = r
End Sub






Private Sub Command4_Click()
a = Val(Text1.Text)
b = Val(Text2.Text)
r = a / b
Text3.Text = r
End Sub






الان اضغط على هذه الشكل لتشغيل برمجيتك 




ويمكنك اختبارها 




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






اتمنى ان يكون الشرح خفيف وغير معقد ,, 


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

قمت بارفاق مثال على الة حاسبة اتمنى ان تستفيد منه

وانا هنا جاهز للاجابة على استفساراتك في اي وقت Angel


الملفات المرفقة
.zip   Calculator.zip (الحجم : 3.89 ك ب / التحميلات : 107)
الرد }}}}
تم الشكر بواسطة: ABO.BANCIANA


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Thumbs Down سؤال عن توليد خمس خانات من رقمين؟؟؟؟ KamelArab 7 103 09-12-16, 07:06 PM
آخر رد: KamelArab
  سؤال - توزيع حروف الكلمة في التكستات بالترتيب الأبجدي abusofy 8 120 09-12-16, 11:03 AM
آخر رد: abusofy
Lightbulb سؤال - توزيع حروف الكلمة في تكستات abusofy 3 111 07-12-16, 10:25 PM
آخر رد: abusofy
  [سؤال] سؤال بخصوص mdi form و child الخاصة بها engabuhema 2 80 29-11-16, 12:52 AM
آخر رد: engabuhema
  [سؤال] سؤال في الـ Decompile M@GED 0 55 05-11-16, 05:27 AM
آخر رد: M@GED
  سؤال في مثال كنونو 1 81 23-10-16, 02:16 AM
آخر رد: Ahmed_Mansoor
  [vb6.0] سؤال فى داتا ريبورت عن كيفية طباعة سجل واحد فقط المبرمج العتيق 4 178 02-10-16, 12:53 AM
آخر رد: Ahmed_Mansoor
  استفسار بشأن طباعة نتيجة البحث abomna 0 128 01-10-16, 05:41 PM
آخر رد: abomna
  [سؤال] سؤال حول التقارير باسط الحسن 13 398 09-09-16, 10:25 PM
آخر رد: باسط الحسن
  [سؤال] سؤال عن كيفية عمل فلتر للجمع في الداتا غريد فاضل الحمود 8 361 13-07-16, 10:05 PM
آخر رد: princeofislam

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم