这个循环内的代码将被执行至少一次,即使 i 小于 10 。
重复执行代码直到条件变成 true
您可以使用 Until 关键字来检查 Do 。Loop 语句的条件 。
Do Until i=10
some code
Loop
如果 i 等于 10,上述循环内的代码将终止执行 。
Do
some code
Loop Until i=10
这个循环内的代码将被执行至少一次,即使 i 等于 10 。
退出 Do 。Loop
您可以通过 Exit Do 关键词退出 Do 。Loop 语句 。
Do Until i=10
i=i-1
If i<10 Then Exit Do
Loop
这个循环内的代码,只要 i 不为 10 且 i 大于 10 时都将被执行 。
参考资料:搜狗百科——循环语句
4. VB编程,for语句 For 是用来循环执行一系列操作的语句 。
语法如下:for 循环变量=起始值 to 终止值 [STEP] 步长<要执行的语句序列> next [循环变量]循环变量要事先定义,循环执行的次数=终止值与起始值的差的绝对值除以步长再取整数部分 比方说要连续输出10个*,就这样写 dim i as integer '这句定义变量 for i=1 to 10print "*"; '连续输出 next i程序运行时要先看循环变量当前值是否超过终止值,如果超过就不执行内容,如果没超过就执行一次,然后让变量值按步长值增加或减少 。默认情况下 。
步长与step如果省掉的话步长值为1,如果你需要变量不按1增加的话就需要加上step与步长值 。例如: dim i as integer for i=1 to 10 step 2print "*"; next i 这段程序运行就只会输出5个*还可以让循环倒着来 例如: dim i as integer for i=10 to 1 step -1print "*"; next i 。
5. VB编程,for语句 For 是用来循环执行一系列操作的语句 。语法如下:
for 循环变量=起始值 to 终止值 [STEP] 步长
<;要执行的语句序列>
next [循环变量]
循环变量要事先定义,循环执行的次数=终止值与起始值的差的绝对值除以步长再取整数部分
比方说要连续输出10个*,就这样写
dim i as integer '这句定义变量
for i=1 to 10
print "*"; '连续输出
next i
程序运行时要先看循环变量当前值是否超过终止值,如果超过就不执行内容,如果没超过就执行一次,然后让变量值按步长值增加或减少 。默认情况下 。步长与step如果省掉的话步长值为1,如果你需要变量不按1增加的话就需要加上step与步长值 。
例如:
dim i as integer
for i=1 to 10 step 2
print "*";
next i
这段程序运行就只会输出5个*
还可以让循环倒着来
例如:
dim i as integer
for i=10 to 1 step -1
print "*";
next i
6. 要求编写一个VB的FOR循环语句 Private Sub Command1_Click()
Dim a(7, 3) As Integer, i As Integer, j As Integer
Dim Sum As Single, Pjf As Single
Dim s As String
For i = 0 To 7
Sum = 0
Pjf = 0
For j = 0 To 3
a(i, j) = Val(InputBox("请输入第" & j + 1 &; "门成绩(-1 退出)","学生" & i + 1 &; "各科成绩录入"))
If a(i, j) = -1 Then Exit Sub
Sum = Sum + a(i, j)
Next
s = s &; "学生" & i + 1 &; "总分:" & Sum &; "分,平均分:" & Format(Sum / 4, "0.00") & vbNewLine
Next
MsgBox s, vbInformation,"成绩统计结果"
End Sub
文章插图
- 怎么区分金钻和天堂鸟视频 怎么区分金钻和天堂鸟
- 解除合同书怎么写
- 行书限字怎么写
- 餐饮领班总结怎么写
- 权字毛笔字怎么写
- 和蔼的拼音怎么写
- 幼儿园家访意见怎么写
- 文明的拼音怎么写
- 孜拼音怎么写
- 任何的拼音怎么写