[Taha Okla]

(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