问题
单项选择题
在窗体上画两个名称分别为Text1、Texte2的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:
Private SubCommand1_Click()
Dim x As Integer,n As Integer
x=1
n=0
Do While x<20
x=x*3
n=n+1
Loop
Text1.Text=Str(x)
Text2.Text=Str(n)
End Sub
程序运行后,单击命令按钮,在两个文本框中显示的值分别是 ______。
A.15和1
B.27和3
C.195和3
D.600和4
答案
参考答案:B
解析: 程序中执行循环的情况如下。
第一次循环:x=x*3=1*3=3,n=n+1=0+1=1。
第二次循环:x=x*3=3*3=9,n=n+1=1+1=2。
第三次循环:x=x*3=9*3=27,n=n+1=2+1=3。此时,循环条件不成立,程序结束,最后x=27和n=3。