在VB编程中，可以使用以下方法输入数字：
使用InputBox函数
InputBox函数可以弹出一个对话框，提示用户输入数据，并返回包含输入内容的字符串。用户可以在对话框中直接输入数字。
示例代码：
```vb
Dim Message As String
Message = "Enter a value between 1 and 3" ' 设置提示信息
Title = "InputBox Demo" ' 设置标题
Default = "1" ' 设置缺省值
MyValue = InputBox（Message, Title, Default） ' 使用帮助文件及上下文
```
使用TextBox控件
在VB中，可以使用TextBox控件创建一个输入框，用户可以直接在文本框中输入数字。通过TextBox控件的Text属性可以获取用户输入的数据。
示例代码：
```vb
Private Sub Button1_Click（ByVal sender As System.Object, ByVal e As System.EventArgs） Handles Button1.Click
Dim userInput As String
userInput = TextBox1.Text ' 使用userInput变量进行后续操作
End Sub
```
使用Integer.Parse方法
如果需要将文本框中的内容转换为整型数值，可以使用Integer.Parse方法。
示例代码：
```vb
Private Sub Button1_Click（sender As Object, e As EventArgs） Handles Button1.Click
' 将文本框的内容转换为整型
Dim number As Integer = Integer.Parse（TextBox1.Text）
' 使用整型数值进行操作
' ...
End Sub
```
这些方法可以帮助你在VB编程中实现数字的输入。根据具体的应用场景和需求，可以选择合适的方法。