问题
单项选择题
在窗体上画两个名称为Text1、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。