المحتوى
تستخدم مربعات النص بشكل أساسي لتلقي مدخلات المستخدم ، أو يتم برمجتها مسبقًا لعرض المعلومات من مصدر بيانات. في Visual Basic 6.0 ، يتم استخدام عنصر التحكم "TextBox" (TextBox) لرسم مربع نص داخل نموذج Windows. خصائصه يمكن تعديلها اعتمادا على احتياجات المستخدم. على سبيل المثال ، يمكنك إعداد مربع نص للقراءة فقط أو قابل للتحرير ، بألوان خلفية مختلفة أو أشرطة التمرير. يمكنك أيضًا تحديد نوع إدخال النص الذي يمكن قبوله. تعرف على كيفية إنشاء برنامج Visual Basic 6.0 الذي يحد الإدخال في مربع النص إلى أرقام فقط.
الاتجاهات
أدخل الأرقام فقط في مربع النص (كوكب المشتري / بولكا دوت / غيتي إيماجز)-
قم بتحميل بيئة Visual Basic 6.0 بالنقر فوق رمز اختصار البرنامج على سطح المكتب ، أو عن طريق تحديد "Microsoft Visual Basic 6.0" من قائمة "ابدأ" على جهاز الكمبيوتر الخاص بك.
-
حدد "EXE قياسي" في مربع الحوار "مشروع جديد" ثم انقر فوق الزر "فتح".
-
أضف مربع نص إلى النموذج بالنقر فوق عنصر التحكم "TextBox" في "Toolbox" ثم ارسم الحجم المطلوب للمربع. تأكد من أنها كبيرة بما يكفي لتخزين أحرف إدخال المستخدم.
-
قم بإلغاء تحديد التسمية التوضيحية للنص عن طريق حذف كلمة "النص 1" بجوار خاصية "النص" في نافذة "الخصائص" على الجانب الأيمن من الشاشة.
-
انقر نقرًا مزدوجًا فوق عنصر تحكم مربع النص لعرض نافذة "الرمز". هذا هو المكان الذي ستكتب فيه التعليمات أو التعليمات البرمجية المصدر التي سيتم تشغيل البرنامج عند فتحها. ستعمل شفرة المصدر التي تكتبها على التحقق من صحة إدخال المستخدم ولن تقبل سوى الأحرف الرقمية ، وإلا ستعرض رسالة خطأ.
-
أدخل الكود التالي داخل الحدث "Text1_Change":
إذا لم يكن IsNumeric (Text1.Text) ثم MsgBox "إدخال رقمي فقط!" ، VbCritical ، "إدخال غير صالح" Text1.Text = "" End If
-
اضغط على "F5" أو انقر فوق "تشغيل" ثم "ابدأ" في القائمة للتبديل إلى وضع التشغيل.
-
اختبار البرنامج لمعرفة ما إذا كان يعمل كما ينبغي. اكتب الأحرف الأبجدية الرقمية أو مجموعات الحروف والأرقام في مربع النص. يجب أن تشاهد رسالة خطأ تفيد بأن الإدخال غير صالح. الآن ، فقط أدخل الأرقام في مربع النص. في حالة عدم ظهور رسالة خطأ ، يعمل البرنامج بشكل صحيح.
-
احفظ البرنامج عن طريق تحديد "حفظ المشروع" من قائمة "ملف". اختر اسمًا للملف ، وأدخله في المساحة المتوفرة وانقر فوق "حفظ".