مدونة أبو تيم

كود التحقق من مدخلات TextBox  

  RSS

أبو تيم
(@f902)
Member Admin
الإنضمام: 3 سنوات مضت
المشاركات: 11
21/03/2019 2:15 م  

لتحديد عدد معين من TextBox

If TextBox1.Text = Nothing Or TextBox2.Text = Nothing Or TextBox3.Text = Nothing Or TextBox4.Text = Nothing Or TextBox5.Text = Nothing Or TextBox6.Text = Nothing Then
    MsgBox("One of text is empty,Please put a word in text", vbInformation, "Information")
Else
    'The code here
End If

أو يمكنك استخدام هذا الكود لأي عدد من الـ TextBox

Dim EmptyCount As Integer = (From T As TextBox In Controls.OfType(Of TextBox)() Where T.Text.Trim = "" Select T).Count
If EmptyCount > 0 Then
    MsgBox("One of text is empty,Please put a word in text", vbInformation, "Information")
Else
    'The code here
End If

 

تحياتي

تم تعديل هذا الموضوع 4 أشهر مضت بواسطة أبو تيم

أقتباس
شارك:

  
Working

Please Login or Register