2. 计算机
  3. 下列程序共执行了______次循环。Private Sub Command1_ Click () Dim intsum As Integer Dim i AS Integer Dim j As Integer i = 1

下列程序共执行了______次循环。Private Sub Command1_ Click () Dim intsum As Integer Dim i AS Integer Dim j As Integer i = 1

admin2013-04-11  30
问题 下列程序共执行了______次循环。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 intsumEnd Sub
选项 A、14
B、15
C、14
D、13
答案A
解析 本题的难点是判断循环非正常退出。do ... Loop until循环是先执行后判断。
转载请注明原文地址:https://jikaoti.com/ti/wZ60FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)