我一直在尝试使用" Do While"创建一个VB脚本。循环在VBScript中。我想在用户接受的两个号码之间生成表格我不知道这有什么问题:
option explicit
Dim i, a, j, product, table
a = inputbox("enter a number")
For i=1 to a
j=1
Do while(j<=10)
product=i*j
a=i&"*"&j&"="&product
table=table&vbnewline&a
loop
msgbox table
next
上述结果为空白窗口。
任何人都可以帮我解决问题吗?
P.S。 我设法使用&#34; For&#34;环。
答案 0 :(得分:1)
选项1:使用For
循环:
Dim i
For i = 1 To 10
' This will run 10 times
Next
选项2:使用Do While
循环:
Dim j
j = 1
Do While j <= 10
' This will also run 10 times
j = j + 1
Loop
修改强>:
如果您需要在i
和j
上循环,则可以创建嵌套 For
循环:
Dim i, j
For i = 1 To 10
For j = 1 To 10
' This will run 10 times for each value of i (so 100 total)
Next
Next