[ali.alfoly]

في حدث KeyPress الخاص بالـ TextBox ضع الكود التالي

كود :

If Not Char.IsControl(e.KeyChar) Then
            If Not Char.IsDigit(e.KeyChar) Then
                e.Handled = True
            End If
        End If