منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
textbox - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : textbox (/showthread.php?tid=42365)

الصفحات: 1 2

textbox - aymen_libya - 04-09-22

السلام عليكم 
كيف جعل textbox يقبل ارقام ونقطه  . فقط

RE: textbox - سعود - 04-09-22

(04-09-22, 09:52 AM)aymen_libya كتب : السلام عليكم 
كيف جعل textbox يقبل ارقام ونقطه  . فقط

و عليكم السلام و رحمة الله و بركاته
ضمن حدث  KeyPress لمربع النص

PHP كود :
       e.Handled = Not (Char.IsDigit(e.KeyChar) Or e.KeyChar = ".") 


RE: textbox - aymen_libya - 04-09-22

(04-09-22, 10:00 AM)سعود كتب :
(04-09-22, 09:52 AM)aymen_libya كتب : السلام عليكم 
كيف جعل textbox يقبل ارقام ونقطه  . فقط

و عليكم السلام و رحمة الله و بركاته
ضمن حدث  KeyPress لمربع النص

PHP كود :
       e.Handled = Not (Char.IsDigit(e.KeyChar) Or e.KeyChar = ".") 

هل قصدك e.Handled=false

RE: textbox - سعود - 04-09-22

(04-09-22, 10:49 AM)aymen_libya كتب : هل قصدك e.Handled=false

نعم هذا كود يمنع اي ادخال غير الارقام والنقطة.

RE: textbox - aymen_libya - 04-09-22

(04-09-22, 11:04 AM)سعود كتب :
(04-09-22, 10:49 AM)aymen_libya كتب : هل قصدك e.Handled=false

نعم هذا كود يمنع اي ادخال غير الارقام والنقطة.

كود :
If Char.IsDigit(e.KeyChar) Or e.KeyChar = "." Then
      e.Handled = True
        End If
لماذا انا كتبته هكذا لايعمل ممكن توضيح سبب خطأ
اريد تعمل ارقام ونقطه وزر backspace فقط

RE: textbox - سعود - 04-09-22

(04-09-22, 11:33 AM)aymen_libya كتب :
كود :
If Char.IsDigit(e.KeyChar) Or e.KeyChar = "." Then
      e.Handled = True
        End If
لماذا انا كتبته هكذا لايعمل ممكن توضيح سبب خطأ
اريد تعمل ارقام ونقطه وزر backspace فقط

 لازم تستخدم الاقواس وتضع تحققات داخلية وتحقق خارجي:
المعذرة لا ادري كيف اوضح اكثر
PHP كود :
If (Char.IsDigit(e.KeyChar) = True Or (e.KeyChar = "." Or e.KeyChar = ControlChars.Back = True) = True) = False Then
            e.Handled = True
        End If 


RE: textbox - aymen_libya - 04-09-22

(04-09-22, 12:06 PM)سعود كتب :
(04-09-22, 11:33 AM)aymen_libya كتب :
كود :
If Char.IsDigit(e.KeyChar) Or e.KeyChar = "." Then
      e.Handled = True
        End If
لماذا انا كتبته هكذا لايعمل ممكن توضيح سبب خطأ
اريد تعمل ارقام ونقطه وزر backspace فقط

 لازم تستخدم الاقواس وتضع تحققات داخلية وتحقق خارجي:
المعذرة لا ادري كيف اوضح اكثر
PHP كود :
If (Char.IsDigit(e.KeyChar) = True Or (e.KeyChar = "." Or e.KeyChar = ControlChars.Back = True) = True) = False Then
            e.Handled = True
        End If 
ممكن شرح لي كلاس ControlChars

RE: textbox - سعود - 04-09-22

(04-09-22, 03:24 PM)aymen_libya كتب : ممكن شرح لي كلاس ControlChars

لا اعرف كيف اشرح لكن انت تعرف ازرار الكيبورد منها حروف ومنها تحكم اما حذف او ادخال مثل Enter  وغيرها من الازرار.
ممكن تشوف الرابط لتعرف اكثر.

RE: textbox - Taha Okla - 04-09-22

(04-09-22, 11:33 AM)aymen_libya كتب :
كود :
If Char.IsDigit(e.KeyChar) Or e.KeyChar = "." Then
      e.Handled = True
        End If
لماذا انا كتبته هكذا لايعمل ممكن توضيح سبب خطأ
اريد تعمل ارقام ونقطه وزر backspace فقط


الاساس أنها الخاصية ملغية - والتفعيل يعني تعليق الكتابة لذلك مش راح تضبط معك
لذلك يجب أن تكتب الشروط عكسياً لتعمل :

كود :
       If Char.IsDigit(e.KeyChar) = False And e.KeyChar <> "." And AscW(e.KeyChar) <> 8 Then
           e.Handled = True
       End If


RE: textbox - aymen_libya - 04-09-22

فهمت عليك يعني لو كان مش رقم ومش نقطه ومش
backspace تعليق باقي اوامر لوحه مفاتيح