VB点击按钮，弹出输入框，输入数据后点击输入框里的确定按钮，继续弹出输入框……可以无限输入数据；若无输入数据，点击确定按钮，则退出。

这是一个比较典型的循环输入的程序，可以使用一个While循环来实现无限输入数据的功能，并且在输入数据为空时退出循环。以下是一个简单的VB代码示例：

Private Sub btnInput_Click()
Dim inputStr As String
inputStr = InputBox("请输入数据：")
While inputStr <> ""
' 在这里处理输入的数据
inputStr = InputBox("请输入数据：")
Wend
End Sub

在这个代码中，我们首先使用InputBox函数弹出一个输入框，让用户输入数据。然后使用一个While循环来不断地弹出输入框并处理输入的数据，直到用户输入的数据为空为止。在循环中，我们可以根据实际需求来处理输入的数据，比如将数据保存到数组中或者输出到文本框等。

相关问题

vb.net弹出可输入框

在 VB.NET 中，您可以使用 `InputBox` 函数来弹出一个可输入的对话框。`InputBox` 函数显示一个消息并等待用户输入一个值。用户输入的值将作为函数的返回值返回。

以下是一个使用 `InputBox` 函数的示例代码：

Dim userInput As String = InputBox("请输入您的姓名：", "输入框标题", "默认值")

在这个示例中，`InputBox` 函数将显示一个对话框，标题为 "输入框标题"，消息为 "请输入您的姓名："。用户可以在对话框中输入一个值。如果用户点击了确定按钮，则这个值将被存储在 `userInput` 变量中。如果用户点击了取消按钮，则 `userInput` 变量将为一个空字符串。

您可以根据需要自定义对话框标题、消息和默认值，以及根据用户的输入进行后续处理。

请注意，`InputBox` 函数在 VB.NET 中是一个简单的输入对话框解决方案。如果您需要更复杂的用户界面，您可能需要使用自定义对话框或窗体来实现。

在vb6.0里怎么实现在QQ密码输入框里输入密码呢？

在VB6.0中，可以使用TextBox控件来实现在QQ密码输入框里输入密码的效果。具体步骤如下：

1. 在窗体上放置一个TextBox控件，并设置PasswordChar属性为"*"，这样输入的内容就会被替换为星号。

2. 在TextBox的KeyDown事件中，判断用户输入的字符是否为控制字符（如Backspace、Delete、Enter等），如果不是，则将输入的字符替换为"*"后添加到TextBox的Text属性中。

下面是示例代码：

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode <> vbKeyBack And KeyCode <> vbKeyDelete And KeyCode <> vbKeyReturn Then
Text1.Text = Text1.Text & "*"
End If
End Sub

这样，在TextBox中输入的内容就会被替换为星号，实现了在QQ密码输入框里输入密码的效果。