[填空题] 阅读下面的程序：Private Sub Form_Click()Dim Check As Boolean, Counter As IntegerCheck = TrueCounter = 5 Do Do While Counter < 20 Counter = Counter + 1 If Counter = 10 Then Check = False Exit Do End If Loop Loop Until Check = FalsePrint CounterEnd Sub程序运行

参考答案：

● 参考解析

DoWhile…Loop是先判断条件表达式的值是否为True，如果为True，则执行循环体，如果为False，则执行Loop后面的语句。Do…LoopUntil是先执行循环体，再判断条件表达式，如果表达式的值为True，则执行Loop后面的语句，如果为False，则继续执行循环体。而ExitDo则是强行退出循环。本题中，当Counter=10时，强行退出DoWhile循环，而由于此时Check=False，使得Until的条件为True，结束外层循环。所以最终Counter=10。

相关题目:

[填空题] 软件开发环境是全面支持软件开发全过程的【4】集合。
[填空题] 关系模型的完整性规则是对关系的某种约束条件，包括实体完整性、【5】和自定义完整性。
[填空题] 软件工程的出现是由于【2】。
[填空题] 软件结构是以【3】为基础而组成的一种控制层次结构。
[填空题] 算法的基本特征是可行性、确定性、【1】和拥有足够的情报。

微信端

推荐题目

● [单项选择题] 激活菜单栏的快捷...
● [单项选择题] 使标签所在处显示...
● [单项选择题] 在窗体上有如右图...
● [填空题] 在窗体上建立一个单选...
● [填空题] 数据库是指按照一定的...
● [填空题] 表达式"12345"＜＞"12345"＆"...
● [单项选择题] Visual Basic标题...
● [单项选择题] 下列说法中正确的...

当前位置：IT认证＞BASIC题库

[填空题] 阅读下面的程序：Private Sub Form_Click()Dim Check As Boolean, Counter As IntegerCheck = TrueCounter = 5 Do Do While Counter &lt; 20 Counter = Counter + 1 If Counter = 10 Then Check = False Exit Do End If Loop Loop Until Check = FalsePrint CounterEnd Sub程序运行

相关题目:

[填空题] 阅读下面的程序：Private Sub Form_Click()Dim Check As Boolean, Counter As IntegerCheck = TrueCounter = 5 Do Do While Counter < 20 Counter = Counter + 1 If Counter = 10 Then Check = False Exit Do End If Loop Loop Until Check = FalsePrint CounterEnd Sub程序运行