[dubai.eig]

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

شكرا لك نعم هو المطلوب بارك الله فيك

---

(07-10-17, 09:33 PM)a.ahmed كتب :

PHP كود :

Mid$(TextBox1.Text, 1, 3) = Val(Mid$(TextBox1.Text, 1, 3) + 1).ToString("000") 


فعلا الكود يعمل بشكل جيد


شكرا لك احسنت