新建一个工程,在窗体中创建两个文本框,其名称分别为Text1和Text2。编写一个事件过程,实现在程序运行后,若在文本框Text1中输入一个字符串。若该字符串超过15个字符后,超出部分在文本框Text2中显示。如

题目

新建一个工程,在窗体中创建两个文本框,其名称分别为Text1和Text2。编写一个事件过程,实现在程序运行后,若在文本框Text1中输入一个字符串。若该字符串超过15个字符后,超出部分在文本框Text2中显示。如图12所示程序中不得使用任何变量。

注意:存盘时必须存放在考生文件夹下,工程文件名为ylc4.vbp,窗体文件名为ylc4.frm。

如果没有搜索结果或未解决您的问题,请直接 联系老师 获取答案。
相似问题和答案

第1题:

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

第2题:

在窗体中绘制两个文本框和一个命令按钮,然后在命令按钮的代码窗口中编写如下事件过程:

Private Sub Command1_Click()

Text1="VB programming"

Text2=Text1

Text1="ABCD"

End Sub

程序运行后,单击命令按钮,文本框Text2中显示的内容为【 】。


正确答案:VB programming
VB programming 解析:本段程序是先把"VB programming"赋给Text1,然后再把Text1的内容赋给Text2,最后把"ABCD"赋给Text1。最后Text1中的内容是"ABCD",而Text2中的内容是"VB programming"。

第3题:

在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text 1、Text2,然后编写如下程序:PrivateSubCommand1_Click()a=Text1.textb=Text2.textC=Lcase( )D=Ucase( )PrintC;DEndSub程序运行后,在文本框Text 1、Text2中分别输入AbC和Efg,结果是( )

A、abcEFG

B.abcefg

C.ABCefg

D.ABCEFG


正确答案:A

第4题:

在窗体上绘制两个文本框,名称分别为Text1和Text2。请设置适当的控件属性,并编写适当的事件过程,使得在运行时,若在Text1中每输入一个字符,则显示输入的内容,同时在Text2中显示一个“*”。若在Text2中每输入一个字符,则显示—今“*”,如下图所示。

注意:

程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为 execise40.vbp,窗体文件名为execise40.frm。


正确答案:

第5题:

在窗体上画两个文本框(其名称分别为Text1和Text2)和一个命令按钮(其名称为 Commandl),然后编写如下两个事件过程: Private Sub Command1_Click() Text1.Text = "Computer Rank Examination" End Sub Private Sub Text1_Change() Text2.Text = UCase(Text1.Text) End Sub程序运行后,单击命令按钮,则在Text2文本框中显示的内容是______。

A.Computer Rank Examination

B.computer rank examination

C.COMPUTER RANK EXAMINATION

D.空字符串


正确答案:C

第6题:

在窗体上画两个文本框和一个命令按钮,然后在命令按钮的代码窗口中编写如下事件过程:

Private Sub Command1_Click()

Text 1="VB programming"

Text 2=Text 1

Text 1="ABCD"

End Sub

程序运行后,单击命令按钮,文本框Text 2中显示的内容为【 】。


正确答案:VB programming
VB programming 解析:本段程序是先把“VB programming”赋给Text 1,然后在把Text 1的内容赋给Text 2,最后把“ABCD”赋给Text 1。所以最后Text 1中的内容是“ABCD”,而Text 2中的内容是“VB programming”。

第7题:

在名为“Form1”的窗体上添加3个文本框和一个命令按钮,其名称分别为“Text1”、“Text2”、“Text3”和“Command1”,然后编写如下两个事件过程:

Private Sub Commandl Click()

Text3=Text1+Text2

End Sub

Private Sub Form1 Load()

Text1=" "

Text2=" "

Text3=" "

End Sub

打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为【 】。


正确答案:57
57 解析:本题考查对“+”的理解。在VBA中,“+”既可以用作数学运算符,也可以用来连接字符串。题目程序实现将两个文本框中字符串进行连接,然后在第3个文本框中显示,所以应该是57,在连接字符串方面,“+”和“&”是相同的功能,但“&”只能用来连接字符串,而不能进行数学运算。命令按钮 Commandl的Click事件是:Text3=Text1+Text2是将文本框Text1和Text2的内容进行连接后显示在Text3文本框中,窗体Form1的Load事件是将3个文本框的内容清空。当在文本框中输入内容后,单击命令按钮来触发其Click事件,完成两个字符串的连接。

第8题:

在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Labell和 Commandl,然后编写如下两个事件过程;

Private Sub Command1_Click()

S$= InputBox ("请输入1个字符串")

Text1.Text= S$

End Sub

Private Sub Text1_Change()

Labell.Caption = UCase(Mid(Text1, Text2, 8))

End Sub

程序运行后,单击命令按钮,将显示一个输入对话框,如果在该对话框中输入字符串"Visual Basic",则在标签中显示的内容是______。


正确答案:BASIC
BASIC

第9题:

在窗体中添加一个命令按钮,名称为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.abcEFG

B.abcefg

C.ABCefg

D.ABCEFG


正确答案:A