有如下程序： Private Sub Commandl＿Click() Dim i As Integer，j As Integer Dim Sum As Integer n=l Do

admin2013-11-29 46

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

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

答案B

解析外层Do循环结束条件是n>10，n初值为1，每次加2，循环体中每次循环n的值为3、5、7、9、11，值变化5次，因此外层Do循环执行次数为5次。

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

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