在VB编程中，设置输入的方法有多种，以下是一些常用的方法：
使用InputBox函数
InputBox函数用于显示一个输入对话框，提示用户输入其内容。用户输入的内容将存储在变量中，并根据用户是否输入内容来显示相应的消息框。以下是一个简单的示例代码：
```vb
Dim userInput As String
userInput = InputBox（"请输入您的姓名：", "输入对话框"）
If userInput <> "" Then
MsgBox "您输入的姓名是： " & userInput
Else
MsgBox "您没有输入任何内容"
End If
```
使用Textbox控件
在VB中，可以使用文本框（TextBox）控件来接收用户输入。用户可以在文本框中直接输入数据，然后通过代码获取这些数据。以下是一个简单的示例代码：
```vb
Private Sub Command1_Click（）
Dim name As String
name = Text1.Text ' 获取文本框1中的内容
MsgBox "您好，" & name & "!欢迎您。"
End Sub
```
使用SendKeys函数
SendKeys函数可以将键盘的按键操作发送到活动的窗口，从而实现自动输入的效果。以下是一个使用SendKeys函数实现自动输入的简单示例：
```vb
Private Sub AutoInput（）
' 在“计算器”程序中输入数字12345
AppActivate "计算器" ' 激活“计算器”窗口
SendKeys "12345" ' 输入数字12345
SendKeys "{ENTER}" ' 模拟按下回车键
End Sub
```
使用MsgBox函数
MsgBox函数用于向用户显示简短的信息，并等待用户做出响应。它常用于在程序中显示提示信息或确认操作。以下是一个简单的示例代码：
```vb
Private Sub Command1_Click（）
MsgBox "欢迎使用本程序!", vbOKOnly, "欢迎信息"
End Sub
```
这些方法可以根据不同的需求选择使用，以实现灵活的输入设置。