![[单项选择题] 下列程序共执行了______次循环。Private Sub Command1_ Click () Dim intsum As Integer Dim i AS Integer D](http://www.mshxw.com/aiimages/31/252286.png "[单项选择题] 下列程序共执行了______次循环。Private Sub Command1_ Click () Dim intsum As Integer Dim i AS Integer D")
[单项选择题] 下列程序共执行了______次循环。
Private Sub Command1_ Click ()
Dim intsum As Integer
Dim i AS Integer
Dim j As Integer
i = 1
j = 1
do
do
intsum = intsum +
j =j+2
Print j;
Loop until j ＞3
i = i+1
Loop until i＞17
Print
Print intsum
End Sub
A．14
B．15
C．14
D．13
参考答案：
A问题解析:
本题的难点是判断循环非正常退出。do ... Loop until循环是先执行后判断。
