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

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

在窗体上画两个文本框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=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()A=text1.value+text2.valueMsgbox aEnd subPrivate sub form_load()Text1.value= ””Text2.value= ””End sub程序运行时,在文本框 text1 中 78 ,在文本框 text2 中输入 87 ,单击命令按钮,消息框中输出的结果为____ 11 ___

考题 在窗体上画两个文本框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

考题 在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框。程序运行后, Command1 为禁用(灰色),此时如果在文本框中输入字符,则命令按钮 Command1 变为可用。请填空。Private Sub Form_Load()Command1  Enabled=FalseEnd SubPrivate Sub Text1_ ________ ()Command1  Enabled=TrueEnd Sub

考题 ( 7 ) 在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框 。 程序运行后 , Command 1为禁用(灰色),此时如果在文本框中输入字符,则命令按钮 Command1 变为可用。请填空。Private Sub Form_Load()Command1.Enabled = FalseEnd SubPrivate Sub Text1_ 【 7 】 ()Command1.Enabled = TrueEnd Sub

考题 在窗体(Name 属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: Private Sub Commnd1_Click() a=Text1.Text+Text2.Text Print a End Sub Private Sub Form_ Load () Text1 Text=“” Text2 Text=“” End sub程序运行后,在第一个文本框(Text1)和第二个文本框(text2)中分别输入123和321,然后单击命令按钮,则输出结果为______ 。A.444B.321123C.123321D.132231

考题 在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text1、Text2,然后编写如下程序: Private Sub Command1_Click() a=Text1.Text b=Text2.Text c=LCase (A)d=UCase (B)Print c;d End Sub程序运行后,在文本框Text1、Text2中分别输入AbC和Efg,结果是______ 。A.abcEFGB.abcefgC.ABCefgD.ABCEFG

考题 ( 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

考题 在名为Form1的窗体上添加三个文本框和一个命令按钮,其名称分别为Text1、Text2、Text3和Command1,然后编写如下两个事件过程: Private Sub Command1_Click() Text3=Textl+1Text2 End Sub private Sub Form1_Load() Text1="" Text2="" Text3="" End Sub 打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为( )。A.57B.12C.5D.出错

考题 在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后,Colnmand1为禁用(灰色)。当向文本框中输入任何字符时,命令按钮command1变为可用。请将程序补充完整。Private Sub Form_Load()Command 1.Enabled=FalseEnd SubPrivate SubText1【 】()Command1.Enabled=TrueEnd Sub

考题 在名为“Form1”的窗体上添加3个文本框和一个命令按钮,其名称分别为“Text1”、“Text2”、“Text3”和“Command1”,然后编写如下两个事件过程:Private Sub Commandl Click()Text3=Text1+Text2End SubPrivate Sub Form1 Load()Text1=" "Text2=" "Text3=" "End Sub打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为【 】。

考题 在窗体上添加一个命令按钮(名为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

考题 在窗体上有两个文本框控件和一个命令按钮,名称分别为Text1、Text2和Command1,以下程序实现的功能是当单击Command1按钮时,将把Text2控件中的文本全部选中,并把焦点设置在该文本框中。程序运行时的界面如图20-4所示,以下两空应填( )。Private Sub Command1_Click() TextSelStart=0 Text________=Len(TextText) Text_______ End SubA.SelLength SetFocusB.SelText SetFocusC.SelLength GetFocusD.SelText GetFocus

考题 在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: Private Sub Command1_Click() A=Text1.Text+TextText Print a End Sub Private SUb Form胃Load() Text1.Text= " " TextText=" " End Sub程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入33和44,然后单击命令按钮,则输出结果为A.77B.33+44C.3344D.4433

考题 在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Labe11,文本框的Text1属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() x=Int(Val(TextText)+0.5) LabeCaption=Str(x) End Sub 程序运行后,在文本框中输入653,单击命令按钮,标签中显示的内容是______。A.27B.28C.29D.30

考题 在名为“Form1”的窗体上添加3个文本框和一个命令按钮,其名称分别为“Tem1”、“Text2”、“Text3”和“Command1”,然后编写如下两个事件过程:Private Sub Command1 Click()Text3=Text1+Text2End SubPrivate Sub Forml Load()Text1=""Text2=""Text3=""End Sub打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为【 】。

考题 在窗体下画两个文本框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

考题 在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text1和.Text2,然后编写如下程序: Private Sub Command1_Click() Dim x As String,y As String, C As String,d As String x = Text1.Text : y = TextText c = LCase(x):d = UCase(y) Print c; d End Sub 程序运行后,在文本框Texn、Text2中分别输入AbC和efG,结果是A.abcEFGB.abcefgC.ABCefgD.ABCEFG

考题 在窗体(Name属性为form1)上画两个文本框(Name属性分别为Text1和Text2)和一个命令按钮 (Name属性为Command1),然后编写如下两个事件过程,该过程的运行结果为______。Private Sub Command1_Click() a = Text1, Taxt + Text2, Text Print aEnd SubPrivate Sub form_ Load() Text1.Text = "123" Text2.Text = "321"End SubA.444B.321123C.123321D.132231

考题 在窗体上画两个名称为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

考题 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的是A. VisualB.BasicC.ProgramD.出错

考题 在窗体上画两个文本框(名称分别为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

考题 在窗体上画两个文本框(其名称分别为Textl和Text2)和一个命令按钮(其名称为 Command1),然后编写如下两个事件过程: Private Sub Command1_Click() Text1.Text="Microsoft Visual Basic" End Sub Private Sub Text1_Change() TextText=UCase(Text1.Text) End Sub 程序运行后,单击命令按钮,则在Text2文本框中显示的内容是A.Microsoft Visual BasicB.microsoft visual basicC.MICROSOFT VISUAL BASICD.空字符串

考题 在窗体(NAME属性为FORM1)上画三个文本框(其NAME属性分别为TEXT1、TEXT2和TEXT3)和一个命令按钮(NAME属性为COMMAND1),然后编写如下两个事件过程: PRIVATE SUB COMMAND1_CLICK( ) TEXT3=TEXT1+TEXT2 END SUB PRIVATE SUB FORM1_LOAD( ) TEXT1="" TEXT2="" TEXT3="" END SUB 程序运行后,在第一个文本框(TEXT1)和第二个文本框(TEXT2)中分别输入5和7,然后单击命令按钮,则文本框(TEXT3)中显示的内容为( )。A.12B.57C.75D.空值

考题 在窗体上画一个名为Command1的命令按钮和一个名为Text1的文本框,并把窗体的 KeyPreview 属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Form_ Load () Show Text1.Text = " " TextSetFocus End Sub Private Sub Command1 Click() TextText= LCase(SaveAll) End Sub Private Sub Form_ KeyPress (KeyAscii As Integer) SaveAll = SaveAll + Chr(KeyAscii) End Sub程序运行后,在键盘上输入ABCDEFG,单击命令按钮,则文本框中显示的内容为 ______。A.abodefgB.不显示任何信息C.ABCDEFGD.出错

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

考题 在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: 程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入“同学们,”和“你们好”,然后单击命令按钮,则输出结果为多少?