有如下程序： Private Sub Command 1 Click() Dim i As Integer,j As Integer，sum As Integer n=1 Do j=1 Do sum=sum+j：j=j+1 Print j； Loop Un

admin2019-04-29 48

问题有如下程序：
Private Sub Command 1 Click()
Dim i As Integer,j As Integer，sum As Integer
n=1
Do j=1
Do
sum=sum+j：j=j+1 Print j；
Loop Until j>3
n=n+2
Loop Until 13>10
Print sum
End Sub
运行上述程序，外层Do循环执行的次数为

选项 A、4
B、5
C、7
D、10

答案B

解析外循环的控制条件为n>10，即n>10的时候结束循环；在每次内循环中j都会自加，j>3的时候退出内循环，即每次外循环中内循环都会执行3次；由于内循环没有改变n的值，面在外循环中n的值自加2．所以外循环共循环5次。

转载请注明原文地址:https://kaotiyun.com/show/pmUp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类