03-11-18, 06:09 PM
السلام عليكم ورحمة الله
استفساري عن طريقة معرفة اذا كان ال textbox يحتوي على ارقام وحروف
مثلا
textbox1.Text
مكتوب في كذا
001TRC
textbox2.Text
مكتوب في كذا
011TRC
يعطيني مسج ان المربعين فيهم حروف وارقام
اريد اعرف هل في المربع حرف مع ارقام او ارقام فقط
الكود اللي عندي موب شغال تمام في غلط حاولت التعديل عليه بس ما ضبط
هذا هو
وبارك الله فيكم
استفساري عن طريقة معرفة اذا كان ال textbox يحتوي على ارقام وحروف
مثلا
textbox1.Text
مكتوب في كذا
001TRC
textbox2.Text
مكتوب في كذا
011TRC
يعطيني مسج ان المربعين فيهم حروف وارقام
اريد اعرف هل في المربع حرف مع ارقام او ارقام فقط
الكود اللي عندي موب شغال تمام في غلط حاولت التعديل عليه بس ما ضبط
هذا هو
كود :
Dim shg1S As String = textbox1.Text
Dim NumberqS As Boolean = False
Dim LetterwwS As Boolean = False
For Each cS As Char In shg1S.ToCharArray
If Char.IsNumber(cS) Then NumberqS = True
If Char.IsLetter(cS) Then LetterwwS = True
Next
Dim shg1 As String = textbox2.Text
Dim Numberq As Boolean = False
Dim Letterww As Boolean = False
For Each c As Char In shg1.ToCharArray
If Char.IsNumber(c) Then Numberq = True
If Char.IsLetter(c) Then Letterww = True
Next
If Letterww AndAlso Numberq OrElse LetterwwS AndAlso NumberqS Then
MsgBox("W")
End If
وبارك الله فيكم