[单选题]给出下面的程序：Private Sub Command1_ Click() Dim Check, Counter Check= True: Counter = 0 do do while Counter 20 Counter = Counter +1 if Counter = 10 then Check=False exit do End if Loop Loop until Check=False MsgBox CounterEnd Sub 程序最后弹出的消息对话框的内容是______。

正确答案 ：D

10

解析：解析：本题的难点是dowhile…Loop和do…Loopuntil循环控制问题。实际上在该段程序中，有三处判断控制循环，条件先成立处先执行。首先变量“Counter=10”时，“Check=False”，退出内层循环，do…Loopuntil根据条件“Check=False”又退出外层循环，此时“Counter=10”。

[单选题]若已定义x和y为double类型，则表达式x=1，y=x+3/2的值是______。

正确答案 ：C

2

[单选题]的特点，保证了软件的可移植性。

正确答案 ：D

跨平台

查看原题 点击获取本科目所有试题