برنامج تعليمي لعناصر التحكم في VB.Net TEXTBOX: الخصائص مع المثال
⚡ ملخص ذكي
نصBox تقبل عناصر التحكم في VB.Net إدخال المستخدم على Windows قم بتشكيل وعرض خصائص مثل Multiline و PasswordChar و MaxLength و ReadOnly لتشكيل كيفية إدخال النص أو إخفائه أو تقييده أو قفله في وقت التشغيل.
ما هو النصBox مراقبة؟
النصBox يتيح لك التحكم إدخال نص في النموذج الخاص بك أثناء وقت التشغيل. الإعداد الافتراضي هو أنه سيقبل سطرًا واحدًا فقط من النص، ولكن يمكنك تعديله لقبول أسطر متعددة. يمكنك أيضًا تضمين أشرطة التمرير في النص الخاص بكBox مراقبة.
نصBox عقارات
فيما يلي الخصائص الأكثر شيوعًا لـ Visual Basic TextBox مراقبة:
- محاذاة النص- لضبط محاذاة النص
- أشرطة_التمرير- لإضافة أشرطة التمرير، سواء الرأسية أو الأفقية
- متعدد الأسطر- لتعيين النصBox التحكم للسماح بخطوط متعددة
- الحد الاقصى للطول– لتحديد الحد الأقصى لعدد الأحرف النصBox سوف تقبل السيطرة
- فهرس- لتحديد فهرس مجموعة التحكم
- يمكن لمستخدمي تطبيق Smart Spaces مع Google Wallet الاستفادة من دخول محمول دون لمس مع أي قارئ HID® Signo™ مُمكَّن بتقنية NFC.- لتمكين التحكم في مربع النص
- يقرأ فقط- إذا تم التعيين على "صحيح"، فستتمكن من استخدام النصBox إذا تم ضبط خيار التحكم على "خطأ"، فلن تتمكن من استخدام النصBox مراقبة.
- الاختيار- لتحديد أو الحصول على نقطة البداية للنصBox مراقبة.
- الطول– لتحديد أو الحصول على عدد الأحرف التي تم تحديدها في النصBox مراقبة.
- النص المحدد- إرجاع النصBox عنصر التحكم المحدد حاليًا.
نصBox الفعاليات
الغرض من الأحداث هو جعل النصBox التحكم في الاستجابة لإجراءات المستخدم مثل النقر أو النقر المزدوج أو تغيير محاذاة النص. فيما يلي الأحداث الشائعة للنصBox مراقبة:
- تغيير الحجم التلقائي- يتم تشغيله بواسطة تغيير في خاصية AutoSize.
- قراءة فقط تغيرت- يتم تشغيله بسبب تغيير قيمة خاصية القراءة فقط.
- انقر- يتم تشغيله عن طريق النقر على النصBox مراقبة.
كيفية إنشاء نصBox
اتبع هذه الخطوات لإضافة نصك الأولBox التحكم في Windows قم بإنشاء وعرض رسالة ترحيبية أثناء التشغيل.
الخطوة 1) لإنشاء نصBox، اسحب النصBox التحكم من صندوق الأدوات إلى Windows النموذج:
الخطوة 2)
- انقر فوق النصBox التحكم الذي قمت بإضافته إلى النموذج.
- انتقل إلى قسم الخصائص الموجود في أسفل يسار الشاشة. قم بتغيير اسم مربع النص من نصBox1 إلى HelloTextBox:
الخطوة 3) أضف الكود التالي لإضافة نص إلى عنصر التحكم:
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'Add text to the control
HelloTextBox.Text = "Hello. Welcome to Guru99!"
End Sub
الخطوة الرابعة) يمكنك الآن تشغيل الكود بالنقر فوق زر "ابدأ" الموجود في الشريط العلوي:
الخطوة 5) يجب أن تحصل على النموذج التالي:
فيما يلي لقطة شاشة للكود الكامل لما ورد أعلاه:
شرح الكود:
- إنشاء فئة عامة باسم Form1.
- إنشاء إجراء فرعي يسمى Form1_Load. سيتم استدعاؤه عند تحميل النموذج.
- ملاحظة: سيتجاهل مُصرّف VB.Net هذا الجزء.
- قم بإنهاء الإجراء الفرعي.
- إنهاء الفصل.
خاصية PasswordChar
أحيانًا، تريد استخدام مربع نص لـping كلمة مرور. هذا يعني أن أي شيء يُكتب في مربع النص هذا يجب أن يبقى سريًا. وهذا ممكن باستخدام VB.Net. ويمكن القيام بذلك باستخدام PasswordChar الخاصية التي تسمح لنا باستخدام أي شخصية تريدها. دعونا نوضح ذلك باستخدام مثال:
ابدأ بإنشاء مشروع جديد. اسحب نصينBox عناصر التحكم، وعلامتين، وزر واحد في النموذج. غيّر النصوص الموجودة على العلامتين والزر إلى ما يلي:
انقر فوق مربع النص بجوار تسمية اسم المستخدم، وانتقل إلى قسم الخصائص الموجود في أسفل يسار النافذة. أعطه الاسم UsernameField.
افعل نفس الشيء بالنسبة للنصBox التحكم بجوار تسمية كلمة المرور، مع إعطائها اسم حقل كلمة المرور.
يجب عليك الآن إنشاء نص حقل كلمة المرورBox قم بإظهار علامة * لكل حرف يتم كتابته فيه، أضف الكود التالي:
Private Sub PasswordField_TextChanged(sender As Object, e As EventArgs) Handles PasswordField.TextChanged
PasswordField.PasswordChar = "*"
End Sub
الآن، قم بتشغيل التعليمات البرمجية بالنقر فوق الزر "ابدأ". سوف ينبثق النموذج.
اكتب اسم المستخدم وكلمة المرور ولاحظ ما يحدث. يجب أن ترى ما يلي:
يظهر اسم المستخدم، ولكن تم إخفاء كلمة المرور. إليك الكود لما سبق:
شرح الكود:
- إنشاء فئة تسمى Form1.
- إنشاء إجراء فرعي باسم PasswordField_TextChanged(). سيتم استدعاؤه عند تحميل النموذج.
- استخدام خاصية PasswordChar لإظهار * عندما يقوم المستخدم بكتابة كلمة المرور.
- إنهاء الإجراء الفرعي.
- إنهاء الفصل.
السطر الجديد في النصBox
بشكل افتراضي، يمكنك إنشاء سطر واحد فقط من النص في مربع النص. هناك طريقتان يمكننا من خلالهما تحقيق ذلك. دعنا نناقشهما.
قم بسحب وإسقاط النصBox أضف عنصر تحكم إلى نموذجك. أعطِ عنصر التحكم الاسم المطلوب. Guruأهلا بك.
انقر فوق عنصر التحكم في مربع النص مرة أخرى وحرك مؤشر الماوس إلى قسم "الخصائص". قم بتغيير قيمة خاصية "متعدد الأسطر" إلى "صحيح".
أو يمكنك بدلاً من ذلك ضبط خاصية Multiline على القيمة true في التعليمات البرمجية الخاصة بك كما يلي:
Guruمرحباً. متعدد الأسطر = صحيح
أضف الكود التالي:
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
GuruWelcome.Multiline = True
GuruWelcome.Text = "Line 1"
GuruWelcome.Text = GuruWelcome.Text & ControlChars.NewLine & "Line 2"
End Sub
عند التنفيذ، سيتم فصل سطرين من النص.
شرح Code:
- إنشاء فئة تسمى Form1.
- إنشاء روتين فرعي باسم Form1_Load().
- ضبط خاصية "متعدد الأسطر" على "صحيح". سيتمكن مربع النص من استيعاب أكثر من سطر واحد.
- إضافة السطر الأول من النص إلى مربع النص.
- إضافة السطر الثاني من النص إلى مربع النص. تساعدنا خاصية ControlChars.NewLine في فصل السطرين.
- إنهاء الروتين الفرعي.
- إنهاء الفصل.
استرداد القيم الصحيحة
تتعامل لغة VB.Net مع كل شيء كسلسلة نصية. هذا يعني أنك تقرأ عددًا صحيحًا من مربع النص كسلسلة نصية، ثم تحوله إلى عدد صحيح. ويتم ذلك عادةً باستخدام الدالة Integer.Parse().
لإثبات ذلك، قم بإنشاء عنصر تحكم جديد في مربع نص بالإضافة إلى زر. أعط مربع النص اسم age. أعط الزر اسم Button1. يجب أن يكون لديك الواجهة التالية:
أضف الكود التالي:
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim x As Integer
x = Integer.Parse(age.Text)
MessageBox.Show(x)
قم بتشغيل الكود وأدخل عمرك في مربع النص. انقر فوق الزر "إظهار العمر". يجب أن ترى ما يلي:
يتم إرجاع القيمة التي تدخلها في رسالةBox.
شرح Code:
- إنشاء فئة تسمى Form1.
- إنشاء إجراء فرعي يسمى Button1_Click. سيتم استدعاؤه عند النقر على الزر.
- تحديد متغير عدد صحيح يسمى x.
- تحويل القيمة المقروءة من مربع النص المسمى age إلى عدد صحيح.
- عرض القيمة المحولة في الخطوة أعلاه في رسالةBox.
- إنهاء الإجراء الفرعي.
نص للقراءة فقطBox
يمكنك جعل مربع نص للقراءة فقط. هذا يعني أن المستخدم لن يتمكن من تعديل القيمة المعروضة داخل مربع النص. للقيام بذلك، اضبط خاصية ReadOnly على True. لتوضيح ذلك، أنشئ مربع نص جديدًا وسمّه guru99. أضف الكود التالي:
Private Sub guru99_TextChanged(sender As Object, e As EventArgs) Handles guru99.TextChanged
guru99.Text = "welcome to Guru99"
guru99.ReadOnly = True
End Sub
ينبغي أن يعيد الكود ما يلي:
هذا هو الرمز:
شرح Code:
- إنشاء فئة تسمى Form1.
- إنشاء روتين فرعي اسمه guru99_TextChanged.
- إضافة نص إلى مربع النص المسمى guru99.
- ضبط خاصية "للقراءة فقط" لمربع النص على "صحيح". هذا يجعل النص الموجود في مربع النص غير قابل للتعديل.
- إنهاء الإجراء الفرعي.
- إنهاء الفصل.
خاصية الحد الأقصى للطول
يمكن أن تساعدك خاصية MaxLength في تحديد الحد الأقصى لعدد الكلمات أو الأحرف التي يسمح بها مربع النص. لتوضيح ذلك، قم بإنشاء مربع نصBox قم بتعديل الملف وأعطه الاسم الكامل (fullName). أضف الكود التالي:
Private Sub fullName_TextChanged(sender As Object, e As EventArgs) Handles fullName.TextChanged
fullName.MaxLength = 8
End Sub
قم بتشغيل الكود وحاول كتابة اسمك الكامل. لن تتمكن من كتابة أكثر من 8 أحرف، مع تضمين المسافة البيضاء:
الرمز:
Code التفسير:
- إنشاء فئة تسمى Form1.
- إنشاء إجراء فرعي يسمى fullName_TextChanged.
- جعل مربع النص fullName يقبل الحد الأقصى وهو 8 أحرف فقط.
- إنهاء الإجراء الفرعي.
- إنهاء الفصل.




















