Private Sub Command1_Click()
x=0
D.o Until x>=50
x=(x+4)*(x+3)
n=n+1
Loop
Text1.Text=Str(n)
Text2.Text=Str(x)
E.nd Sub
运行程序后,单击命令按钮,在两个文本框中显示的值分别为( )。
A.1和0
B.2和240
C.3和50
D.4和168
[单选题]在窗体上画两个文本框Text1和Text2,一个命令按钮Command1,请阅读以下程序段: Private Sub Command1_Click() x=0 Do Until x>=50 x=(x+4)*(x+3) n=n+1 Loop Text1.Text=Str(n) Text2.Text=Str(x) End Sub 运行程序后,单击命令按钮,在两个文本框中显示的值分别为( )。A.1和0B.2和240C.3和50D.4和168
[单选题]在窗体上画两个文本框Text1和Text2,一个命令按钮Command1,请阅读下列程序段: Private Sub Command1_Click() x=0 Do Until x>=50 X=(x+4)﹡(x+3) N=n+1 Loop Text1.Text=Str(n) Text2.Text=str(x) End Sub运行程序后,单击命令按钮,在两个文本框中显示的值分别为A. 1和0 B. 2和240 C. 3和50 D. 4和168
[单选题]窗体上有两个文本框Text1、Text2以及一个命令按钮Command1,编写下列程序:D.im y As IntegerPrivate Sub Command1_Click()D.im x As Integerx=2Text1.Text=p2(p1(x),y)Text2.Text=p1(x)E.nd SubPrivate Function p1(x As Integer)As Integerx=x+y:y=x+yp1=x+yE.nd FunctionPrivate Function p2(x
[单选题]窗体上有两个文本框Text1、Text2以及一个命令按钮Command1,编写下列程序: Dim y As IntegerPrivate Sub Command1_Click()Dim x As Integer x=2 Text1.Text=p2(p1(x), y) Text2.Text=pi(x)End SubPrivate Function p1(x As Integer) As Integer x=x+y:y=x+y p1=x+yEnd FunctionPrivate Function p
[单选题]窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序:D.im y As IntegerPrivate Sub Command1_Click()D.im x As Integerx=2Text1.Text=Fun2(Fun1(x),y)Text2.Text=Fun1(x)E.nd SubPrivate Function Fun1(x As Integer) As Integerx=x+y:y=x+yF.un1=x+yE.nd FunctionPrivate Fun
[单选题]窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序D.im y As IntegerPrivate Sub Command1_Click()D.im x As Integerx=2Text1.Text=Fun2(Funl(x),y)Text2.Text=Funl(x)E.nd SubPrivate Function Funl(x As Integer) As Integerx=x+y ∶y=x+yF.unl=x+yE.nd FunctionPrivate Fun
[单选题]在窗体上画两个名称为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.9和2B.27.和3C.195和3
[单选题]( 33 )在窗体中有一个命令按钮 command1 和一个文本框 text1, 编写事件代码如下:Private sub command1_click()F.or i=1 to 4X=3F.or j=1 to 3F.or k=1 to 2X=x+3Next kNext jNext iText1.value=str(x)E.nd sub打开窗体运行后,单击命令按钮,文本框 text1 输出的结果是A. ) 6B. ) 12C. ) 18D. ) 21
[试题]在窗体中有两个文本框分别为 text1 和 text2 ,一个命令按钮 command1, 编写如下两个事件过程:Private sub command1_click()A.=text1.value+text2.valueMsgbox aE.nd subPrivate sub form_load()Text1.value= ””Text2.value= ””E.nd sub程序运行时,在文本框 text1 中 78 ,在文本框 text2 中输入 87 ,单击命令按钮,消息框中输出的结果为____
[单选题]在窗体上有两个命令按钮Command1和Commnd2,三个文本框Text1,Text2和Text3,有如下事件过程: Private Sub Comuand1_Click() Text3.Text= Text1.Text+Text2.Text End Sub Private Sub Command2_Click() Text3.Text= Text3.Text+Str(Val(Text1.Text)+Val (Text2.Text)) End Sub程序运行后,在Text1和Text2中分别输