网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

在窗体下画两个文本框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,请阅读下列程序段:Private Sub Command1_Click()x=0Do Until x>=50x=(x+4)*(x+3)n=n+1LoopText1.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、Command1和Labell,文本框的Text1属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Labell.Caption=Str(x) End Sub 程序运行后,在文本框中输入28.653,单击命令按钮,标签中显示的内容是 ______。A.27B.28C.29D.30

考题 在窗体上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(真Name属性为Command1),然后编写如下事件过程: Private Sub Command1_Click() x=0 Do While x<50 x=(x+2)*(x+3) n=n+1 Loop Text1.Text=Str (n) Text2.Text=Str (x) End Sub程序运行后,单击命令按钮,在两个文本框中显示的值分别为______ 。A.1和0B.2和72C.3和50D.4和168

考题 ( 19 )在窗体上画两个文本框(名称分别为 text1 和 text2 )和一个命令按钮(名称为 command1 ) , 然后编写如下事件过程:Private Sub Command1_Click()x = 0Do While x 50x = (x + 2) * (x + 3)n = n + 1Looptext1.Text = Str(n)text2.Text = Str(x)End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别为A ) 1 和 0B ) 2 和 72C) 3 和 50D ) 4 和 168

考题 (24)在窗体上有文本框Text1和命令按钮Command1,并有下列事件过程: Private Sub Command1_Click() Dim i As Integer For j=0 To 50 i=i+3 n=n+1 If i10 Then Exit For Next Text1.Text=Str(n) End Sub 单击命令按钮,程序运行后,在文本框中显示的值是 A.2 B.3 C.4 D.5

考题 在窗体中添加一个命令按钮(名为Command1) 和一个文本框(名为Text1) ,并在命令按钮中编写如下事例代码: Private Sub Command1_Click( ) Str1="981765" Str2="65" n=InStr(Str1,Str2) Me.Text1=n End Sub 窗体打开运行后,单击命令按钮,在文本框中显示______。A.4B.5C.6D.7

考题 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编如下事件过程:Private Sub Command1_Click()Dim i As Integer, n As Integern=0For i=0 To 50i=i+3n=n+1If i>10 Then Exit ForNext iText1.Text=Str(n)End Sub程序运行后,单击命令按钮,在文本框中显示的值是______。

考题 在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1),并在命令按钮中编写如下事件代码: Private Sub Command1_Click() m=2.17 n=Len(Str$(m)+Space(5)) Me!Text1=n End Sub 打开窗体运行后,单击命令按钮,在文本框中显示______。A.5B.8C.9D.10

考题 在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框,然后编写如下事件过程: Private Sub Command1_Click() n=Text1.Text Select Case n Case 1 To 20 x=10 Case 2,4,6 x=20 Case Is<10 x=30 Case 10 x=40 End Select Text2.Text=x End Sub 程序运行后,如果在文本框Text1中输入10,然后单击命令按钮,则在Text2中显示的内容是 ______。A.10B.20C.30D.40

考题 在窗体上画两个文本框(其Name属性分别为了ext1和Text2)和一个命令按钮(其Name属性为Command1),然后编写如下事件过程: Private Sub Command1_Click() x = 0: n = 0 Do Until x >= 30 x = (n + 2)* (n + 3) n = n + 1 Loop Text1.Text = Str(n) TextText = Str(x) End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别为A.2和30B.2和240C.3和50D.4和30

考题 在窗体上画两个文本框(名称分别为Text1和Text2)和—个命令按钮(名称为Cotranand1),然后编写如下事件过程:Private Sub Command1_Click() x=0 Do While x<50 x=(x+2)*(x+3) n=n+1 Loop Text1.Text=Str(n) Text2.Text=Str(x)End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别为______。A.1和0B.2和72C.3和50D.4和168

考题 在窗体上画两个名称分别为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和1B.27和3C.195和3D.600和4

考题 在窗体上画两个名称分别为Text1、Texte2的文本框和一个名称为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和1B.27和3C.195和3D.600和4

考题 在窗体上画两个名称为Tcxt1、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和2B.27和3C.195和3D.600和4

考题 在窗体上画一个名称为Command1 的命令按钮和一个名称为Text1的文本框,然后编写如下程序: Private Sub Command1_Click( ) Dim x,y,z As Integer x=5 y=7 z=0 Texttext = " " Call P1 (x,y,z) TextText = Str(z) End Sub Sub P1(ByVal a As Integer,ByVal b As Integer,c As Integer) c=a+b End Sub 程序运行后,如果单击命令按钮,在文本框中显示的内容是 ______。A.0B.12C.Str(z)D.没有显示

考题 在窗体上有文本框Text1和命令按钮Command1,并有如下事件过程: Private Sub Command1_Click() Dim i As Integer,n As Integer For i=0 To 50 i=i+3 n=n+1 If i>10 Then Exit For Next Text1.Text=Str(n) End Sub 单击命令按钮,程序运行后,在文本框中显示的值是( )。A.2B.3C.4D.5

考题 在窗体上画两个名称为Text l、Text 2的文本框和一个名称为Command l的命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dim x As Integer,n As Integer x=1 n=0 Do While x<20 x=x*3 n=n+l Loop Textl.Text=Str(x) Text2.Text-Str(n) End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别是( )。A.9和2B.27和3C.195和3D.600和4

考题 在窗体上有文本框Text1和命令按钮Command1,并有下列事件过程:Private Sub Command1_Click()Dim i As Integer,n As IntegerFor i=0 To 50i=i+3n=n+1If i10 Then Exit ForNextText1.Text=Str(n)End Sub单击命令按钮,程序运行后,在文本框中显示的值是( )。A.2B.3C.4D.5

考题 在窗体上画两个名称为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和3D.600和4

考题 在窗体上添加两个名称为Textl、Text2的文本框和一个名称为Commandl的命令按钮,然后编写如下事件过程。 Private Sub Commandl Crick0Dim x As Integer,n As Integerx=ln=0Do While x<20x=x*3n==n+1LoopTextl.Text=-Str(x)Text2.Text=-Str(n)EndSub程序运行后,单击命令按钮,在两个文本框中显示的值分别是( )。A.9和2B.27和3C.195和3D.600和4

考题 在窗体中添加两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Com- mand1),然后编写如下程序: Private Sub Command1_Click( ) x=0 Do While x<20 x=(x+1) *(x+2) n=n+1 Loop Text1.Text=Str(n) TextText=Str(x) End Sub 程序运行后,单击命令按钮,在两个文本框Text1和Text2中分别显示的值是A.1和0B.2和12C.3和182D.3和12

考题 在窗体中添加两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1),然后编写如下程序:PrivateSubCommand1_Click()X=0DoWhileXX=(X+1)*(X+2)n=n+1LoopText1.Text=Str(n)Text2.Text=Str(X)EndSub程序运行后,单击命令按钮,在两个文本框Text1和Text2中分别显示的值是( )A、1和0B.2和12C.2和72D.3和12

考题 在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1),然后编写下列事件过程: Private Sub Command1 Click( ) x=0 DO While x50 x=(x+2)*(x4.3) n=n+1 Loop Text1.Text=Str(n) Text2.Text=Str(x) End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别为( )。A.1和0B.2和72C.3和50D.4和168

考题 在窗体上画两个文本框(其NAME属性分别为TEXT1和TEXT2)和一个命令按钮(其NAME属性为COMMAND1),然后编写如下事件过程: PRIVATE SUB COMMAND1_CLICK( ) X=0 N=0 DO WHILE X<50 x=(x+2) * (x+3) N=N+1 LOOP TEXT1=STR(N) TEXT2=STR(X) END SUB程序运行后,单击命令按钮,在两个文本框中显示的值分别为( )。A.1和0B.2和72C.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和0B.2和240C.3和50D.4和168

考题 在窗体中绘制两个文本框和一个命令按钮,然后在命令按钮的代码窗口中编写如下事件过程:Private Sub Command1_Click()Text1="VB programming"Text2=Text1Text1="ABCD"End Sub程序运行后,单击命令按钮,文本框Text2中显示的内容为【 】。

考题 在窗体上画两个名称分别为Text1、Texte2的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim x As Integer,n As Integer x=1 n=0 DoWhilex<20 x=x*3 n=n+1 Loop Text1.Text=Str(x) Text2.Text=Str(n) End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别是()A、15和1B、27和3C、195和3D、600和4