Textbox.text IN .NET 2005

مفاجأة ........

التابع isnumeric مازال مدعوماً في vb 2005 :D

مثال

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
        If Not IsNumeric(TextBox1.Text) Then
            MessageBox.Show("الرجاء إدخال أرقام فقط")
            TextBox1.Text = 0
        End If

    End Sub

يمكن أن تعدل الكود حسب مشيئتك :lol:

سلام

الحدث keyPress هو الدى يتم فيه الاختبار

If Not IsNumeric(e.char)Then
e.Handled=True
EndIf