在VB中,你可以使用以下方法来限制文本框输入数字:
1. 使用KeyPress事件:在文本框的KeyPress事件中,检查输入的字符是否是数字,如果不是数字,则取消输入。可以使用Char.IsDigit方法来判断字符是否是数字。
```vb
Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress
If Not Char.IsDigit(e.KeyChar) AndAlso Not Char.IsControl(e.KeyChar) Then
e.Handled = True
End If
End Sub
```
2. 使用TextChanged事件:在文本框的TextChanged事件中,检查文本框的内容是否是数字,如果不是数字,则清除文本框的内容。
```vb
Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
Dim value As Integer
If Not Integer.TryParse(TextBox1.Text, value) Then
TextBox1.Clear()
End If
End Sub
```
这两种方法可以根据需求选择其中一种或者结合使用。