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

admin2009-03-15  52

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

选项 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://jikaoti.com/ti/wGq0FFFM
0

最新回复(0)