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