2018年信息技术选考VB循环语句基础1实验.doc

编辑：杜宗飞
循环语句基础
行政班：

教学班：

姓名：

学号：
一、For 语句
For 循环变量 = 初值 To 终值 Step 步长
语句 1
语句 2（循环体）
……
编辑：杜宗飞
循环语句基础
行政班：

教学班：

姓名：

学号：
一、For 语句
For 循环变量 = 初值 To 终值 Step 步长
语句 1
语句 2（循环体）
……
Next 循环变量
返回判断循环变量是否小于终值，成立继续循环。 注意：（1）如果步长为负数，循环变量是否大于终 值，成立继续循环。
（2）Step 1 可以省略不写
二、Do 语句
Do While 条件表达式
语句 1
语句 2（循环体）
……
Loop
每次返回重新判断条件是否成立，成立继续循环。 三、快速填空(限时 17 分钟)

流程图步长为正数
开始
F
表达式
T 执行循环体
结束
s = 0
For i = 1 To 6
s = s + i
Next i
（1）上面循环结束后变量 s 的值为 21 s = -1
For i = 5 To 1 Step -2
s = s + i
Next i
（2）上面循环结束后变量 s 的值为 8 s = 0
For i = 1 To 10
s = s + 1
Next i
（4）上面循环结束后变量 s 的值为 10 s = 1
For i = 1 To 5
s = s * i
Next i
（5）上面循环结束后变量 s 的值为 120 s = 1
For i = 1 To 7 Step 3
s = s * i
Next i
（6）上面循环结束后变量 s 的值为 28

编辑：杜宗飞
s = 0 s = 0
For i = 1 To 20 For i = 1 To 5
If i Mod 5 = 0 Then For j = 1 To i
s = s + i s = s + 1
End If Next j
Next i Next i
（7）上面循环结束后变量 s 的值为 50 （13）上面循环结束后变量 s 的值为 15 s = 0 s = 0
For i = 1 To 20 For i = 1 To 5
If i Mod 6 = 0 Then If i Mod 2 = 0 Then
s = s + 1 For j = 1 To i
End If s = s + 1
Next i Next j
（8）上面循环结束后变量 s 的值为 3 End If
Next i
s = 0 （14）上面循环结束后变量 s 的值为 6 For i = 1 To 6
If i / 2 = i \ 2 Then s = s + 1 s = "DZF9ad23": c = 0
Next i For i = 1 To Len(s)
（9）上面循环结束后变量 s 的值为 3 ch = Mid(s, i, 1)
If ch >= "0" And ch