在窗体中建立了三个文本框，名称分别为text1、text2和text3，编写以下程序段：PrivateSubText2_LostFocus()DimiAsIntegerIfIsNumeric(Text2)ThenText3.Text="正确!!"ElseText2.Text=""Text2.SetFocusText3.Text="错误,再输入!!"EndIfEndSub当在text2中输入字符串"abcd"后，点击text3，运行的结果为()A.text2的内容清除,text3中显示"正确!!"B.tex

题目

在窗体中建立了三个文本框，名称分别为text1、text2和text3，编写以下程序段：

PrivateSubText2_LostFocus()

DimiAsInteger

IfIsNumeric(Text2)Then

Text3.Text="正确!!"

Else

Text2.Text=""

Text2.SetFocus

Text3.Text="错误,再输入!!"

EndIf

EndSub

当在text2中输入字符串"abcd"后，点击text3，运行的结果为()

A.text2的内容清除,text3中显示"正确!!"

B.text3中显示"正确!!"

C.光标聚焦在text2中

D.text2的内容清除,text3中显示"错误,再输入!!"

相似考题

1.在名为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．出错

2.有一个VBA计算程序的功能如下，该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为：Text1、Text2、Text3和Text4。3个按钮分别为：清除(名为Command1)、计算(名为Command2)和退出(名为Command3)。窗体打开运行后，单击清除按钮，则清除所有文本框中显示的内容；单击计算按钮，则计算在Text1、Text2和Text3三个文本框中输入的3科成绩的平均成绩并将结果存放在Text4文本框中：单击退出按钮则退出。请将下列程序填空补充完整。Private Sub Command1_Click()Me!Text1=""Me!Text2=""Me!Text3=""Me!Text4=""End SubPdvate Sub Command2_Click()If Me!Text1="" Or Me!Text2="" Or Me!Text3=""thenMsgBox"成绩输入不全"ElseMe!Text4=(【 】+Val(Me!Text2)+Val(Me!Text3))/3【 】End SubPrivate Sub Command3_Click()Docmd. 【 】End Sub

3.在名为“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)中显示的内容为【 】。

4.在名为“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)中显示的内容为【 】。

更多“在窗体中建立了三个文本框,名称分别为text1、text2和text3,编写以下程序段:PrivateSubText2 ”相关问题

  • 第1题：

    在考生文件夹中有一个工程文件execise95.vbp及窗体文件execise95.frm。请在名为 Form1的窗体上绘制3个文本框，其名称分别为Text1、Text2和Text3，文本框内容分别设置为“计算机等级考试”、Visua1Basic和空白。然后绘制两个单选按钮，其名称分别为 Opt1和Opt2，标题分别为Change和Join。编写适当的事件程序。

    程序运行后，如果选中Change单选按钮并单击窗体，则Text1文本框中内容与Text2

    文本框中内容进行交换，并在Text3文本框中显示OK(如下图所示)：如果选中Join单选按钮并单击窗体，则把Text1和Text2的内容按Text1在前，Text2在后的顺序连接起来，并在Text3文本框中显示连接后的内容。修改后的文件仍按原文件名保存在原文件夹下。

    注意：

    不得修改已经给出的程序。在结束程序运行之前，必须选中一个单选按钮，并单击窗体。退出程序时必须通过单击窗体右上角的关闭按钮，否则可能无成绩。


    正确答案：

  • 第2题：

    在窗体(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．12

    B．57

    C．75

    D．空值


    正确答案：B
    解析：完成文本框(TEXT1)和文本框(TEXT2)内容的求和，然后将结果显示在文本框 (TEXT3)中，但文本框的Value属性返回的值是字符串型，故两个字符串进行“+”运算的结果是字符中叠加，即两个字符串相连接。

  • 第3题：

    设在一个窗体中已设置了三个文本框Text1、Text2和Text3，以及若干个单选按钮，且设计有下列程序，请指出程序的功能。
    当用户单击“加”、“减”、“乘”单选按钮时，根据用户的选择，分别对文本框Text1和Text3中的数字进行加、减、乘运算，并将结果在文本框Text2中输出；当用户单击“连接”单选钮时，在Text2中显示的是Text3与Text1中的文本连接运算的结果；当用户单击“其它”单选钮时，在Text2中显示“Other”。文本框Text1中的内容允许用户改变，但用户只能输入数字串，否则报错；Text3中的内容不允许用户改变。
    略

  • 第4题：

    在窗体上建立三个文本框，名称分别为Text1、Text2和Text3，一个命令按纽，名称为command1，如果在TEXT1中输入数200，在TEXT2中输入数150，则执行下列程序后，TEXT3的值为______。 Private Sub Command1_Click() Dim m, n As Integer m = Val (TextText) n = Val (TextText) If n * m = 0 Then Exit Sub End If If m ＜ n Then t =m: m= n: n = t End If Do r = m Mod n m= n n =r Loop While r ＜＞ 0 TextText= m End Sub

    A． 200

    B．50

    C．100

    D．150


    正确答案：B

  • 第5题：

    在名为”Forml”的窗体上添加三个文本框和一个命令按钮，其名称分别为”Textl”、”Text2”、”Text3”和”Commandl”，然后编写如下两个事件过程：


    正确答案：
    510【解析】本题考查“ ”运算符的使用。“ ”运算符可以用于计算两个数之和，也可以使用“ ”运算符连接两个字符串，“ ”，运算符两端的表达式的基本类型决定了“ ”运算符所做的操作，如果两个表达式都是数值或者一个表达式是数值，另一个表达式是字符串，则“ ”代表相加；如果两个表达式都是字符串则“ ”代表字符串的连接。本题中，由于文本框的Text属性值的类型是字符串，所以“ ”运算符连接的是字符串…5和字符串“10”，所以本题答案为510。

相关内容