在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
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
这两种方法可以根据需求选择其中一种或者结合使用。
