كيفية جمع عددين وظهور النتيجة في Visual Basic
صفحة 1 من اصل 1
كيفية جمع عددين وظهور النتيجة في Visual Basic
كيفية جمع عددين وظهور النتيجة في Visual Basic
بسم الله الرحمن الرحيم
الصلاة والسلام على رسول الله
كيفية جمع عددين وظهور النتيجة في Visual Basic
يجب اضافة ثلاث مربعات نص الى نموذج
المربع الاول من أجل ادخال القيمة الاولى والمربع الثاني من أجل ادخال القيمة الثانية
المربع الثالث من أجل عرض النتيجة فيه
واضافة زر الى النموذج من أجل ضغط لعرض النتيجة
طريقة هي نقر على الزر مرتين وكتابة الكود التالي
Dim IntA, IntB As Integer
Dim IntC As Integer
IntA = Val(TextBox1.Text)
IntB = Val(TextBox2.Text)
IntC = IntA + IntB
TextBox3.Text = Str(IntC)
- الكود:
Private Sub CommandButton1_Click()
Dim IntA, IntB As Integer
Dim IntC As Integer
IntA = Val(TextBox1.Text)
IntB = Val(TextBox2.Text)
IntC = IntA + IntB
TextBox3.Text = Str(IntC)
End Sub
تم تصريح بثلاث متغيرات من نوع صحيح أي Integer
واسناد قيم المربعين الاول والثاني الى المتغيرين
وجمع المتغير الاول المتغير الثاني واسناد النتيجة الى المتغير الثالث
ثم تحويل النتيجة الى سلسلة بتعليمة Str واسناد قيمة المتغير الثالث
الى المربع الثالث
التعليمة Val تعني أنها قيمة رقمية من اجل اجراء عمليات حسابية
عليها
ملاحظة استعملت Visual Basic Word 2007
وشكرا
ali- مبرمج مجتهد
- عدد المساهمات : 913
تاريخ التسجيل : 29/07/2013
مواضيع مماثلة
» انشاء قاعدة بيانات Access بـ Visual Basic 2010
» برنامج لجمع عددين Visual C++ 2010
» كيفية جمع عددين في بيزك
» انشاء ملف Dll باللغة دلفي واستدعائه باللغة Visual Basic
» كيفية فتح مشروع Visual C++ 6
» برنامج لجمع عددين Visual C++ 2010
» كيفية جمع عددين في بيزك
» انشاء ملف Dll باللغة دلفي واستدعائه باللغة Visual Basic
» كيفية فتح مشروع Visual C++ 6
صفحة 1 من اصل 1
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى