كم سؤال و استفسار و طلب رأي

تقييم الموضوع :
  • 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 ك ب / التحميلات : 161)
الرد
تم الشكر بواسطة: ABO.BANCIANA


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال عن كيفية ربط برنامج فجوال بيسي6 بقاعدة بيانات على النت amrou 0 28 05-08-18, 10:07 AM
آخر رد: amrou
  [سؤال] سؤال حول تحريك الصور VB6 Immortal73 10 251 02-08-18, 04:54 PM
آخر رد: alipro
  [VB.NET] سؤال كيفية تخزين ملف صوتي فsql server alipro 0 31 02-08-18, 05:09 AM
آخر رد: alipro
Exclamation استفسار هام جدا jalaltech 8 216 05-06-18, 03:31 AM
آخر رد: السيد الغالي
  [vb6.0] استفسار حول ScrollBar basset87 2 88 03-06-18, 12:31 PM
آخر رد: basset87
  [سؤال] سؤال مبتدي في موضوع الريجستري array-31 3 526 20-05-18, 11:20 PM
آخر رد: اسلام الكبابى
  [vb6.0] استفسار حول مكتبة DAO root7x7 2 149 28-04-18, 12:26 PM
آخر رد: root7x7
  [سؤال] سؤال حول فلكس اقريد gadr 8 714 14-04-18, 03:09 PM
آخر رد: Ashraf Elafify
Heart سؤال عن تطابق صورتين؟؟؟ KamelArab 0 118 05-04-18, 04:42 PM
آخر رد: KamelArab
  السلام عليكم سؤال ممكن اتحكم في قاعدة البيانات من جهاز اخر او عن النت محمد جبريل 1 169 21-03-18, 12:22 PM
آخر رد: ahmedabdelaliem

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


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