Question

VB 中inputbox如何设置其属性 可以使其进行连续输入数字

Answer 1

你的意思是想它连续输入数据是不是.

Private Sub Command1_Click()
Dim b(10) As String
For i = 1 To 10
b(i) = InputBox("第" & i & "次输入", "请输入")
Next i

For j = 1 To 10
Print "第" & j & "输入的是：" & b(j)
Next j
End Sub

Answer 2

'输入出-1结束循环 示例代码如下
Private Sub Form_Click()
Do While a <> -1
a = Val(InputBox("请输入一个数："))
Loop
End Sub

Answer 3

a(i)=inputbox(“请输入第 "& i & "次结果”，“输入框”）