منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم ورحمة الله


اعزائي عندي كود الرقم التسلسلي شغال تمام

مع كل ضغطه يتغير الرقم من 001  و 002  وهكذا
ههذا الكود



عندي مشكله في حالت اضافت اي حرف امام الرقم مثلا

005TRC

يعطيني مسج


Conversion from string "010TRC" to type 'Double' is not valid.

لان مرات اريده يكون رقم عادي بدون حروف 


ومرات اريد احط امام الرقم ثلاث حروف  TRC



في نفس الوقت في حالت اني كتبت الحروف TRC   اريد البرنامج يتعرف هل امام الارقام حروف او بدون حروف



اتمنى وصلت الفكرة وشكرا على على المساعدة

للتاكد من اذا كانت القيمة رقمية كلها ام لا يمكن استخدام الدالة ()IsNumeric
فيصبح الكود كالتالي
if IsNumeric(TextBox1.Text) Then
MsgBox("OK")
Else
MsgBox("NO")
End If

(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") 


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


شكرا لك احسنت 

تم ضبط الامر شكرا