07-10-17, 09:31 PM
للتاكد من اذا كانت القيمة رقمية كلها ام لا يمكن استخدام الدالة ()IsNumeric
فيصبح الكود كالتالي
if IsNumeric(TextBox1.Text) Then
MsgBox("OK")
Else
MsgBox("NO")
End If
فيصبح الكود كالتالي
if IsNumeric(TextBox1.Text) Then
MsgBox("OK")
Else
MsgBox("NO")
End If
