问题 单项选择题

下列程序共执行了______次循环。
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循环是先执行后判断。

单项选择题
单项选择题