[علي بنيان]

السلام عليكم 

توجد الكثير من الطرق لجعل التكست لا يقبل الا الارقام اختصرتها في ثلاث طرق والطريقة الاخيرة تسمح بأستخدام زر الباك سبيس 


الكود الاول :

PHP كود :

Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
        If Char.IsNumber(e.KeyChar) = False Then
            e.Handled = True
        End If

    End Sub 


الكود الثاني :

كود :

   Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
       If Not IsNumeric(e.KeyChar) Then
           e.Handled = True
       End If
   End Sub

الكود الثالث (الي يقبل استخدام زر الباك سبيس ) :

PHP كود :

   Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress

        Select Case e.KeyChar
            Case "0" To "9", ControlChars.Back
                e.Handled = False
            Case Else
                e.Handled = True
        End Select

    End Sub 


يمكن تحميل المشروع من المرفقات 


اتمنى لكم التوفيق