问题 单项选择题

在窗体上画两个名称为Tcxt1、Text2的文本框和一个名称为Command1的命令按钮,然后编写如 下事件过程:
Private Sub Command1 Click()
Dim x As Integer,n As Integer
x=1
n=0
Do While x<20
x=x*3
n=n +l
Loop
Text1.Text=Str(x)
Text2.Text=Str(n)
End Sub
程序运行后,单击命令按钮,在两个文本框中显示的值分别是( )。

A) 9和2
B) 27和3
C) 195和3
D) 600和4

答案

参考答案:B

解析: 本题考查While循环的处理过程。循环第1次x=1,执行循环,n=1;循环第2次, x=3,仍然执行循环,n=2 依次类推,当执行完第3次循环后,x=27>20,n=3,不再满足条件,跳出循环,由此可知本题答案为选项B。

选择题
单项选择题