تقييم الموضوع :
  • 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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال حول الأداة datacombo المبرمج العتيق 0 12 منذ 2 ساعة مضت
آخر رد: المبرمج العتيق
  سؤال حول الأداة datareport فى برنامج مرفق المبرمج العتيق 4 89 26-03-17, 04:16 PM
آخر رد: Ahmed_Mansoor
  [vb6.0] سؤال فى داتا ريبورت عن كيفية طباعة سجل واحد فقط المبرمج العتيق 5 355 24-03-17, 06:06 PM
آخر رد: المبرمج العتيق
  سؤال بخصوص الحلقات التكرارية / اضافة درجة بشروط haiderkh 13 266 02-03-17, 05:58 PM
آخر رد: السيد الغالي
  استفسار عن اضافة اكثر من صورة الي رقم واحد عمر سالم 1 107 26-02-17, 01:21 PM
آخر رد: Ahmed_Mansoor
  سؤال فى التقارير اداة داتا ريبورت محمودالصياد محمود 1 67 25-02-17, 11:39 PM
آخر رد: السيد الغالي
  سؤال عن قاعدة البيانات اكسس مبرمج جديد 5 184 17-02-17, 01:27 PM
آخر رد: مبرمج جديد
Heart [vb6.0] استفسار - كيف اجعل قاعدة البيانات على الانترنت sl_dl1 1 105 14-02-17, 01:06 AM
آخر رد: Ahmed_Mansoor
  استفسار عن البحث في عدة حقول واربعه كمبوبكس alfakeehy 8 334 05-02-17, 07:39 PM
آخر رد: alfakeehy
  [vb6.0] سؤال في تنسيق الفورم basset87 4 282 02-01-17, 11:43 AM
آخر رد: basset87

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


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