[أبو خالد الشكري]

الأفضل تعديل الكود الذي وضعه الأخ تيمو

ليكون بالصورة التالية :

كود :

      If Char.IsLetter(TextBox1.Text) Then
           MsgBox("صمدوق النص يحتوي على حروف", MsgBoxStyle.Critical)
       Else
           MsgBox("صمدوق النص يحتوي على أرقام", MsgBoxStyle.Critical)
       End If
   End Sub