问题 单项选择题

在窗体上画一个命令按钮,名称为Command1。
Private Sub Command1 Click()
Dim x As Integer,y As Integer
x=10:y:0
Do
x=x+2:y=y+x
Print "x=", x; "y=",y
If y>20 Then Exit Do
Loop Until x=18
End Sub
程序运行后,如果单击命令按钮,则在窗体上显示的内容是 ______。

A.x=12y=12
x = 14 y = 16
x=16 y=18

B.x=12 y=12
x= 16 y =28
x= 18 y=24

C.x=12 y=12
x= 14 y=44

D.x= 12 y=12
x= 14 y=26

答案

参考答案:D

解析: 给变量x和y赋值后,执行Do...Loop循环。第一个循环后,x的值为12,y的值为12,输出:x=12 y=12。执行“语句,因为条件表达式“y>20”为False,所以不执行后面的Do Exit,判断循环结束条件“x>14”为False,接着执行循环。第二次循环后,x的值为 14,y的值为26,输出结果为x=14 y=26,判断If语句的条件“y>20”为Ture,执行DoExit语句,退出循环。

选择题
问答题