تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
إجبار المستخدم على اختيار واحدة من عدة قيم محددة سابقا في صندوق النصوص
#1
كاتب الموضوع : samerselo



تقوم الفكرة على استخدام الحدث Validating للتأكد من أن المستخدم قد اختار ما يطابق قائمة القيم المقترحة.

للتجربة قم بإنشاء مشروع جديد ثم أضف إليه صندوقي نصوص

في الحدث Load للنموذج ضع الكود التالي


كود :
' تعريف مصفوفة ستحمل خياراتنا للإكمال التلقائي
Dim Lis As New List(Of String)
Lis.Add("Visual Basic")
Lis.Add("Visual C#")
Lis.Add("Visual C++")
Lis.Add("Pascal")
Lis.Add("Delphi")
Lis.Add("C++")
Lis.Add("2100")
Lis.Add("3200")
Lis.Add("Nokia 6600")
Lis.Add("Nokia 3250")
Lis.Add("Nokia 7610")

' تحديد طريقة الإكمال التلقائي
Me.TextBox1.AutoCompleteMode = AutoCompleteMode.SuggestAppend
' تحديد مصدر الإكمال التلقائي
Me.TextBox1.AutoCompleteSource = AutoCompleteSource.CustomSource

' إضافة القائمة الخاصة بنا كمصدر للإكمال التلقائي
Me.TextBox1.AutoCompleteCustomSource.Clear()
Me.TextBox1.AutoCompleteCustomSource.AddRange(Lis.ToArray)
في الحدث Validating لصندوق النصوص TextBox1 ضع الكود التالي


كود :
If Me.TextBox1.AutoCompleteCustomSource.Count = 0 Then
' إذا كانت قائمة الإكمال التلقائي فارغة
Me.TextBox1.Text = String.Empty
Exit Sub
Else
' تحديد إذا كان النص موجود ضمن قائمة الإكمال التلقائي
For Each Str As String In Me.TextBox1.AutoCompleteCustomSource
If Str.ToUpper = Me.TextBox1.Text.ToUpper Then
Me.TextBox1.Text = Str
Exit Sub
End If
Next
End If
' إذا وصلنا إلى هنا فهذا يعني أن النص المدخل غير موجود
' في قائمة الإكمال التلقائي فتكون عملية التحقق فاشلة
e.Cancel = True

شغل البرنامج وقم بالتجربة
}}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ترجمة النصوص من الإنجليزية الي العربية بين الواقع و الخيال silverlight 0 388 19-12-15, 05:12 PM
آخر رد: silverlight
  [كود] إختيار صف واحد أو اختيار جميع الصفوف في الداتا جريد فيو silverlight 0 331 18-12-15, 03:50 PM
آخر رد: silverlight
Thumbs Down [كود] كود لمسح كل التيكست بوكس مرة واحدة مهما كان العدد medo_ya 11 2,247 13-09-15, 05:35 PM
آخر رد: khodor1985
  طريقة عمل برنامج زخرفة النصوص 3booody 3 1,539 19-06-13, 11:36 PM
آخر رد: Hassan Khamees
  اجعل برنامج مضاد للغلق من المستخدم او من التاسك مانجر just.coder 5 907 01-05-13, 03:59 AM
آخر رد: mr.omar
  كيفية عمل mdi حيث يظهر مرة واحدة egypure 2 813 18-12-12, 04:07 AM
آخر رد: egypure
  التقاط لون من شاشة المستخدم H111er 0 375 11-12-12, 08:54 PM
آخر رد: H111er
  معلومة ::: أجعل المستخدم عبر تطبيقك يخرج برامج أخري - CodeDom RaggiTech 6 526 06-10-12, 07:58 PM
آخر رد: RaggiTech
  دوال التعامل مع النصوص RaggiTech 10 6,995 03-10-12, 02:41 PM
آخر رد: RaggiTech

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم