المحتوى

• خطوات
• نصائح
• تحذيرات

في هذه المقالة سوف تتعلم كيفية كتابة برنامج Visual Basic بسيط لحساب مجموع رقمين. أنت بحاجة إلى مترجم Visual Basic مثل Visual Studio 2017 لتشغيل البرنامج.

خطوات

1. 1 افتح محرر Visual Basic. لاختبار الكود الخاص بك لاحقًا ، تأكد من أن لديك برنامجًا يمكنك من خلاله تصحيح التعليمات البرمجية (على سبيل المثال ، Visual Basic 2017).
   • إذا لم يكن لديك محرر Visual Basic ، فاستخدم Notepad ++ أو قم بتنزيل Visual Basic 2017.
2. 2 أدخل السطر الأول من الكود. يدخل Form1 فئة خاصة في محرر Visual Basic ثم انقر فوق ↵ أدخل... يحدد هذا السطر الأسطر التالية من التعليمات البرمجية.
   • علامة "الفئة الخاصة" في Visual Basic هي نفسها علامة html> في HTML.
3. 3 اضبط المتغيرات. للعثور على المجموع ، تحتاج إلى إضافة عددين صحيحين ، لذلك تحتاج إلى جعل Visual Basic يتعرف على الأرقام كمتغيرات. لهذا:
   • يدخل Private Sub Button1_Click (المرسل ككائن ، e كـ EventArgs) و اضغط ↵ أدخل.
   • يدخل مقبض (Button1_Click) و اضغط ↵ أدخل.
   • يدخل ديم سوم كعدد صحيح و اضغط ↵ أدخل.
   • يدخل خافت كعدد صحيح و اضغط ↵ أدخل.
   • يدخل خافت ب كعدد صحيح و اضغط ↵ أدخل.
4. 4 تعيين استثناءات للحقول الفارغة. في هذه الحالة ، سيقوم البرنامج بإنشاء خطأ إذا لم يتم إدخال بعض الأرقام. لهذا:
   • يدخل Label4.Visible = صحيح و اضغط ↵ أدخل.
   • يدخل إذا كان TextBox1.Text = "" إذًا و اضغط ↵ أدخل.
   • يدخل Label4.Visible = خطأ و اضغط ↵ أدخل.
   • يدخل MessageBox.Show ("عذرًا ، لا يمكن أن يكون الحقل فارغًا.") و اضغط ↵ أدخل.
   • يدخل TextBox1.Focus () و اضغط ↵ أدخل.
   • يدخل إنهاء إذا و اضغط ↵ أدخل.
5. 5 قم بإنشاء مربعات نص لإدخال الأرقام. لهذا:
   • يدخل أ = Val (TextBox1.Text) و اضغط ↵ أدخل.
   • يدخل ب = Val (TextBox2.Text) و اضغط ↵ أدخل.
   • يدخل المجموع = (أ + ب) و اضغط ↵ أدخل.
   • يدخل Label4.Text = "مجموع" & a & "و" & b & "يساوي" & sum & "." و اضغط ↵ أدخل.
6. 6 أغلق قسم الضغط على الزر. يدخل End Sub و اضغط ↵ أدخل.
7. 7 قم بإنشاء قسم جديد. يدخل Form1_Load الفرعية الخاصة (المرسل ككائن ، مثل EventArgs) يعالج MyBase.Load و اضغط ↵ أدخل.
8. 8 أدخل العلامتين "خطأ" و "التسمية". يدخل Label4.Visible = خطأ، انقر ↵ أدخل، ثم ادخل End Sub و اضغط ↵ أدخل .
9. 9 أنشئ القسم الأخير. يدخل Private Sub Button2_Click (المرسل ككائن ، e As EventArgs) يتعامل مع Button2.Click و اضغط ↵ أدخل.
10. 10 أضف روابط إلى مربعات النص. سيؤدي هذا إلى إضافة أرقام إلى البرنامج النهائي. لهذا:
    • يدخل TextBox1.Text = "" و اضغط ↵ أدخل.
    • يدخل TextBox2.Text = "" و اضغط ↵ أدخل.
    • يدخل Label4.Text = "" و اضغط ↵ أدخل.
    • يدخل TextBox1.Focus () و اضغط ↵ أدخل.
11. 11 قم بإنشاء أمر لإضافة الأرقام. يدخل Sum = Val (TextBox1.Text) + Val (TextBox2.Text) و اضغط ↵ أدخل.
12. 12 أدخل الأمر "المجموع". يدخل TextBox3.Text = Sum و اضغط ↵ أدخل.
13. 13 أغلق الكود. يدخل End Sub و اضغط ↵ أدخللإغلاق القسم الأخير ، ثم اكتب نهاية الفصللإغلاق البرنامج بأكمله.
14. 14 تصحيح أخطاء البرنامج. انتقل إلى علامة التبويب Debug ، وانقر فوق Start Debugging وانتظر حتى يكتمل التصحيح. بمجرد تصحيح البرنامج بالكامل ، ستفتح نافذة بها ثلاثة حقول نصية وزر ؛ أدخل الآن أرقامًا في المربعين العلويين وانقر فوق الزر لإضافة الأرقام.
    • إذا تمت كتابة الكود في محرر نصوص بسيط ، فلن تكون هناك علامة تبويب تصحيح.في هذه الحالة ، افتح الكود الذي كتبته في Visual Studio 2017 لتصحيحه وتشغيله.
    • إذا كان الرمز مكتوبًا في Notepad أو TextEdit ، فاحفظ الملف بتنسيق ".vb" ، وليس ".txt" أو ".text".

نصائح

• يمكن تنزيل Visual Studio 2017 مجانًا من Microsoft.
• في Notepad أو TextEdit ، يمكن تمييز أقسام مختلفة من التعليمات البرمجية بمسافة بادئة لتسهيل التنقل في التعليمات البرمجية.

تحذيرات

• Visual Basic ليس حساسًا لحالة الأحرف ، ولكن حاول الكتابة بالأحرف الكبيرة في المكان المشار إليه في الكود هنا.