在窗体上画两个名称分别为Text1、Text2的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_click() Dim x As Integer,n As Integer

admin2009-01-15  36

问题 在窗体上画两个名称分别为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+1       Loop       Text1.Text=Str(x)       TextText=Str(n)    EndSub    程序运行后,单击命令按钮,在两个文本框中显示的值分别是 ______。

选项 A、15和1
B、27和3
C、195和3
D、600和4

答案2

解析 跟踪程序的运行:
第一次:x=1<20,x=1*3=3,n=0+1=1
第二次:x=3<20,x=3*3=9,n=1+1=2
第三次:x=9<20,x=9*3=27,n=2+1=3
再循环时,x=27>20,退出循环在Text1和Text2中,分别将x和n转换为字符串输出。
转载请注明原文地址:https://kaotiyun.com/show/9i2p777K
0

最新回复(0)