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输出这个结果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选择 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 Subnum 的初值是1,第一次循环后变成3,第二次循环后变成5,第三次循环后变成7,因为7大于6,结束循环。