Question

vb 求详解

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim num As Integer
num = 1
Do Until num > 6
num = num + 2
Loop
Print num
End Sub
程序运行后，单击命令按钮，则窗体上显示的内容是
A）6 B）7 C）8 D）9

Answer 1

B）7

意思：从1开始累加 每次增加2 直到和大于6
打印出这个值
num=1
不大于6进入循环
num=1+2=3
不大于6继续循环
num=3+2=5
不大于6继续循环
num=5+2=7
大于6结束循环
此时num=7
输出这个结果

Answer 2

选：B

Answer 3

选择 B
Private Sub Command1_Click()
Dim num As Integer `声明整型变量 num
num = 1 `初值是1
Do Until num > 6 `循环直到 num 的值大于6结束
num = num + 2 `num 的值加上2再赋给 num
Print num `加上这句就能看到 num 中间的值
Loop
Print num `输出 num 的值
End Sub
num 的初值是1，第一次循环后变成3，第二次循环后变成5，第三次循环后变成7，因为7大于6，结束循环。

Answer 4

Do...loop循环中，Until关键字是在条件变为真之前重复，放在Do后面是先判断再循环
在本例中即为，当num不大于6时执行累加
num初值1
第一次 1<6,num=3（1+2）
第二次，3<6,num=5 (3+2)
第三次，5<6,num=7 (5+2)
第三次，7>6，跳出循环，执行print num，打印值即为7