✔ 最佳答案
Try:
Private Sub textBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
If Char.IsDigit(e.KeyChar) Or (e.KeyChar) = vbBack Then
'Numbers and BackSpace only
Else
e.Handled = True
End If
End Sub