itgle.com
在窗体中添加两个文本框，其名称分别为Text1和Text2;两个标签，其名称分别为Label1和Label2。编写程序，使得程序运行后，在文本框Text2中输入小写字母，能转换为比此字母的ASCII码小4的大写字母，结果显示在文本框Text1中。如输入“efg”，则输出的结果为“ABC”，能够实现上述功能的程序是A．Private Sub Form. Load() Show Text1．Text=" " Text2．Text=" " Text2．SetFocus End Sub Private Sub T
题目
在窗体中添加两个文本框，其名称分别为Text1和Text2;两个标签，其名称分别为Label1和Label2。编写程序，使得程序运行后，在文本框Text2中输入小写字母，能转换为比此字母的ASCII码小4的大写字母，结果显示在文本框Text1中。如输入“efg”，则输出的结果为“ABC”，能够实现上述功能的程序是
A．Private Sub Form. Load() Show Text1．Text=" " Text2．Text=" " Text2．SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer，Shift As Integer) Text1．Text=Chr(KeyCode-4) End Sub
B．Private Sub Form_Load() Show Text1．Text=" " Text2．Text=" " Text2．SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer，Shift As Integer) Text1．Text=Text1．Text+Chr(KeyCode-4) End Sub
C．Private Sub Form_Load() Show Text1．Text=" " Text2．Text=" " Text2．SetFocus End Sub Private Sub Text2_Click(KeyCode As Integer，Shift As Integer) Text1．Text=Text1．Text+Chr(KeyCOde-4) End Sub
D．Private Sub Form_Load() Show Text1．Text=" " Text2．Text=" " Text2．SetFocus End Sub Private Sub Text2_Click(KeyCode As Integer，Shift As Integer) Text1．Text=Chr(KeyCode-4) End Sub
相似考题
更多“在窗体中添加两个文本框,其名称分别为Text1和Text2;两个标签,其名称分别为Label1和Label2。编写程 ”相关问题
-
第1题：
在名为“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事件，完成两个字符串的连接。 -
第2题：
在名为“Form1”的窗体上添加3个文本框和一个命令按钮，其名称分别为“Tem1”、“Text2”、“Text3”和“Command1”，然后编写如下两个事件过程：
Private Sub Command1 Click()
Text3=Text1+Text2
End Sub
Private Sub Forml Load()
Text1＝""
Text2=""
Text3=""
End Sub
打开窗体Form1后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7，然后单击命令按钮Command1，则文本框(Text3)中显示的内容为【 】。
正确答案：57
57 解析：本题考查对“+”的理解。在VBA中，“+”既可以用作数学运算符，也可以用来连接字符串。题目程序实现将两个文本框中字符串进行连接，然后在第3个文本框中显示，所以应该是57，在连接字符串方面，“+”和“&”是相同的功能，但“&”只能用来连接字符串，而不能进行数学运算。命令按钮 Command1的Click事件是：Text3=Text1-1-Text2是将文本框Text1和Text2的内容进行连接后显示在Text3文本框中，窗体Form1的Load事件是将3个文本框的内容清空。当在文本框中输入内容后，单击命令按钮来触发其Click事件，完成两个字符串的连接。 -
第3题：
在窗体上画两个名称分别为Text1、Text2的文本框，一个名称为Label1标签，窗体外观如图a所示，要求当改变任一个文本框的内容，就会将该文本框的内容显示在标签中，如图b所示。实现上述功能的程序如下：
Private Sub Text1_Change（ ）
Call ShowText(Text1)
End Sub
Private Sub Text2_Change（ ）
Call ShowText(Text2)
End Sub
Private Sub ShowText(T As TextBox)
Labell．Caption="文本框中的内容是："＆T．Text
End Sub
关于上述程序，以下叙述中错误的是（ ）。
A.ShowText过程的参数类型可以是Control
B.ShowText过程的参数类型可以是Variant
C.两个过程调用语句有错，应分别改为Call ShowText(Text1，Text)、Call Show Text (Text2，Text)
D.ShowText过程中的T是控件变量
正确答案：C
C。【解析】两个过程中不能改为CallShowText(Textl．Text)和CallShowText(Text2．Text)因为此时会产生形参和实参不匹配。 -
第4题：
在窗体中添加一个命令按钮，名称为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．abcEFG
B．abcefg
C．ABCefg
D．ABCEFG
正确答案：A
解析：Ucase函数和Lcase函数对大小写字母进行转换。其中Ucase将“字符串”中的小写字母转换为大写字母，而Lcase函数将“字符串”中的大写字母转换为小写字母。 -
第5题：
在考生文件夹下有工程文件sj5．vbp及窗体文件sj5．frm，该程序是不完整的。在名称为Form1的窗体画两个Label控件，名称分别为Label1和Label2，其中Label1中显示“总人数”，Label2中显示“总分”，添加两个名称分别为Text1和Text2的文本框，再画两个命令按钮，名称分别为Command1与Command2、标题分别为“读取数据”与“计算总分”，数据文件in5．txt存放成绩。
要求程序运行后：单击“读取数据”按钮后，从考生文件夹下的in5．txt中读出数据，并在标签Text1中显示人数；单击“计算总分”便在Text2中显示总分并将结果写入考生文件夹下out5．txt文件中；执行完毕，“读取数据”按钮变成“读取完成”，且无效（变灰），如图60-5所示。
注意：请在有“?”号的地方填入正确内容，然后删除“?”及代码前的所有注释符（即“‘”号），但不能修改其他部分。存盘时不得改变文件名和文件夹，程序编写完整后执行一次操作，将结果保存到考生文件夹下的out5．txt文件中，否则没有成绩。
正确答案：本题主要考查文件的读取和求和计算。打开顺序文件的基本格式为：OpenFileNameForModeAs#FileNum-ber。FileName表示要打开的文件的路径；Mode为打开模式，OutPut用于输出、Append用于追加写入、Input用于读取；FileNumber为打开文件时指定的句柄。
本题在读文件时，用While循环和Input#语句读人数据，以EOF(文件号)=False为循环条件，EOF(文件号)用于判断是否读到文件结尾。补充后的代码如下：
-
第6题：
在窗体上绘制两个标签，名称分别为Lab1和Lab2，标题分别为“请输入一个正整数 N”和“1+2+3+…+N=”；绘制两个文本框，名称分别为Text1和Text2，内容都设为空白；绘制一个命令按钮，名为Cmd1，标题为“计算”。编写适当的程序，使程序运行时，在Text1中输入一个正整数N，单击“计算”按钮，计算出1+2+3+…+1N的和显示在Text2中。
程序运行结果如下图所示。
注意：
程序中不得使用任何变量：文件必须存放在考生文件夹中，窗体文件名为 execise120.frm，工程文件名为execise120.vbp。
正确答案：
-
第7题：
在名为Form1的窗体上绘制两个文本框，名称分别为Text1和Text2；再绘制两个命令按钮，名称分别为Cmd1和Cmd2，标题分别为LeR和Right，如下图所示。
要求：
(1)编写适当的事件过程，使得程序运行时，单击LeR按钮，则焦点位于Text1上。
(2)单击Right按钮，则焦点位于Text2上。
注意：
程序中不得使用变量，事件过程中只能写一条语句：文件必须存放在考生文件夹中，工程文件名为execise110.vbp，窗体文件名为execise110.frm。
正确答案：
-
第8题：
在名为Form1的窗体上绘制两个标签(名称分别为Lab1和Lab2，标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Text1和Text2，Text属性均为空白)和一个命令按钮(名称为Cmd1，标题为Display)。然后编写命令按钮的Click事件过程，使程序运行后，在两个文本框中分别输入姓名和年龄，然后单击命令按钮，则在窗体上显示两个文本框中的内容，如下图所示。
注意：
程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为 execise57.vbp，窗体文件名为execise57.frm。
正确答案：
-
第9题：
在窗体中添加两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1)，然后编写如下程序：
PrivateSubCommand1_Click()
X=0
DoWhileX<10
X=(X+1)*(X+2)
n=n+1
Loop
Text1.Text=Str(n)
Text2.Text=Str(X)
EndSub
程序运行后，单击命令按钮，在两个文本框Text1和Text2中分别显示的值是( )
A、1和0
B.2和12
C.2和72
D.3和12
正确答案：B
-
第10题：
在窗体上画两个文本框(其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和0
B．2和72
C．3和50
D．4和168
正确答案：B
解析：第一次循环后N=1，X=6，第二次循环后N=2，X=72，且此时循环终止。 -
第11题：
在窗体上画两个文本框，（其Name 属性分别为Text1和Text2）和一个命令按纽（其Name属性为Command1），然后编写如下事件过程（）
A1和0
B2和72
C3和50
D4和168
B
略 -
第12题：
在在窗体上添加一个命令按钮Command1和两个名称分别为Label1和 Label2的标签，然后编写如下事件过程： Private X AsInteger Private SubCommand1_Click（ ） X = 5: y = 3 Call proc(X, y) Label1.Caption = X Label2.Caption = y End Sub Sub proc(ByVal a As Integer, ByVal bAs Integer) X = a * a y = b + b End Sub 程序运行后，单击命令按钮，则两个标签label1和label2中显示的内容分别是（）。
- A、25，3
- B、25，6
- C、5，3
- D、5，6
正确答案:B -
第13题：
在名为Form1的窗体上绘制两个标签(名称分别为Lab1和Lab2，标题分别为“身高”和“体重”)、两个文本框(名称分别为Text1和Text2，Text属性均为空白)和一个命令按钮(名称为Cmd1，标题为“输入”)。编写命令按钮的Click事件过程，使程序运行后，若单击命令按钮，则先后显示两个输入对话框，在两个输入对话框中分别输入身高和体重，并分别在两个文本框中显示出来，运行后的窗体如下图所示。
注意：
程序中不得使用任何变量：文件必须存放在考生文件夹中，工程文件名为 execise21.vbp，窗体文件名为execise21.frm。
正确答案：
-
第14题：
在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序： Private Sub Form. Load() Show Text1.Text="" Text2.Text="" Text1.SetFocus End Sub Private Sub Text1_Change() Text2.Text=Mid(Text1.Text,8) End Sub 程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2显示的内容是______。
A． BeijingChina
B．China
C．Beijing
D．BeijingC
正确答案：B
解析：本题考的是Mid函数，Mid函数是用宋返回指定数量的字符串。其中第2个参数是指定返回字符串的起始位置，第3个参数是要返回的字符数，这个参数是可选的，如果省略，就返回从起始位置到字符串最后的所有字符。本题中第3个参数省略了，而起始位置是8，该位置的字符是C，所以最后返回的就是China。 -
第15题：
在窗体上画两个名称分别为Label1和Label2的标签，再画一个名称为Command1的命令按钮，然后编写如下事件过程：
运行上面的程序，单击命令按钮．其输出结果是
A．8 9
B．8 18
C．64 9
D．64 18
正确答案：C
解题的关键是窗体变量X和局部变量Y的作用域及过程调用时的参数传递方式。窗体变量X的作用域是该窗体内的所有过程，所以虽然是传值，但在过程Subl中可见，因此在该过程中使用了窗体变量X，这个“x＝a*a”直接将该窗体变量X的值改变为64。而y则是过程Command1_Click的内部变量，与过程Sunl中的变量y没有关系，标签Label2显示的是本过程的Y值，即9。正确答案为c。 -
第16题：
新建一个工程。在窗体中画三个标签，名称分别为Label1、Label2和Label3，标题分别为“加数1”、“加数2”和“和”。在三个标签下分别有三个文本框(名称分别为Textl、TexQ和Text3)用来输入数字。要求编写一个事件过程，程序运行后在文本框Text1和Text2中输入数字，单击文本框删后其中输出两个数的和。如图14所示。程序中不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名为ylc2.vbp，窗体丈件名为ylc2.frm。
正确答案：Visual Basic集成环境中执行“文件”→“新建工程”命令选择“标准Exe”。创建窗体Form1。 (2)在工具箱中选择标签控件在窗体中要求位置画出3个标签其Caption属性分别为“加数1”、“加数2”和“和”。 (3)在工具箱中选择文本框控件在窗体上创建3个文本框。双击文本框Text3弹出代码窗口添加代码： Private Sub Text3 click() Text3=Val(Text1)+Val(Text2) End Sub (4)按F5键运行程序。如图14所示。 (5)执行“文件”→“保存工程”命令将工程文件命名为yle2.vbp窗体文件命名为ylc2.frm。
Visual Basic集成环境中，执行“文件”→“新建工程”命令，选择“标准Exe”。创建窗体Form1。 (2)在工具箱中选择标签控件，在窗体中要求位置画出3个标签，其Caption属性分别为“加数1”、“加数2”和“和”。 (3)在工具箱中选择文本框控件，在窗体上创建3个文本框。双击文本框Text3弹出代码窗口，添加代码： Private Sub Text3 click() Text3=Val(Text1)+Val(Text2) End Sub (4)按F5键运行程序。如图14所示。 (5)执行“文件”→“保存工程”命令，将工程文件命名为yle2.vbp，窗体文件命名为ylc2.frm。 解析：(2)第2小题中，利用Val函数将输入的字符串转换为数值进行计算。 -
第17题：
在名称为Form1的窗体上画两个标签（名称分别为Label1和Label2，标题分别为“姓名”和“年龄”）、两个文本框（名称分别为Textl和Text2，初始内容均为空）和一个命令按钮（名称为Command1，标题为“显示”）。然后编写命令按钮的Click事件过程。程序运行后，在两个文本框中分别输人姓名和年龄，然后单击“显示”按钮，则在窗体上显示两个文本框中的内容，如图所示。要求程序中不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjtl．vbp，窗体文件名保存为sjtl．frm。
正确答案：【考点分析】本题考点有：标签的Name和Caption属性、文本框Name和Text属性、命令按钮的Name和Caption属性、“＆”和“+”运算符以及Print方法。
【解题思路】通过标签的Name和Caption属性设置标签的名称和标题，通过文本框Name和Text属性设置文本框的名称和文本，通过命令按钮的Name和Caption属性设置命令按钮的名称和标题，“＆”和“+”运算符均可将两个表达式作为字符串连接。在窗体上输出文本内容可使用Print方法。
【操作步骤】
步骤1：新建一个窗体，按照题目要求建立控件并设置相应属性，程序中用到的控件及属性如表3．16所示。
步骤2：打开代码编辑窗口，在指定位置编写如下代码。
参考答案
Private Sub Command1_Click()
Form1．Print Text1．Text＆"，现年"＆
Text2．Text＆"岁"
End Sub
步骤3：调试并运行程序，关闭程序后按题目要求存盘。 -
第18题：
在名为Form1的窗体上绘制两个标签(名称分别为Lab1和Lab2，标题分别为“书名”和“作者”)、两个文本框(名称分别为Text1和Text2，Text属性均为空白)和一个命令按钮(名称为Cmd1，标题为Display)。然后编写命令按钮的Click事件过程，使程序运行后，在两个文本框中分别输入书名和作者，然后单击命令按钮，则在窗体的标题栏上先，后显示两个文本框中的内容，如下图所示。
注意：
要求程序中不得使用任何变量；文件必须存放在考生文件夹中；工程文件名为 execise51.vbp，窗体文件名为execise51.frm。
正确答案：
-
第19题：
（1）在名为Form1的窗体上绘制两个标签（名称分别为Label1和Label2，标题分别为“长”和“宽”）、两个文本框（名称分别为Text1和Text2，Text属性均为空白）和一个命令按钮（名称为Command1，标题为“输入”）。编写命令按钮的Click事件过程，使程序运行后，若单击命令按钮，则先后显示两个“输入”对话框，在两个“输入”对话框中分别输入长和宽，并分别在两个文本框中显示出来，运行后的窗体如图21-1所示。
注意：程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为sj1．vbp，窗体文件名为sj1．frm。
（2）在名为Form1的窗体上绘制一个标签（名称为Label1，标题为“输入”）、一个文本框（名称为Text1，Text属性为空白）和一个命令按钮（名称为Command1，标题为“显示”）。请编写命令按钮的Click事件过程，使程序运行后，在文本框中输入内容，然后单击命令按钮，则标签和文本框消失，并在窗体上显示文本框中的内容。运行后的窗体如图21-2和图21-3所示。
注意：要求程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为Sj2．vbp，窗体文件名为sj2．frm。
正确答案：(1)根据题意，新建“标准EXE”工程，在窗体上添加两个标签，名称分别为Label1和Label2、Caption属性分别为“长”和“宽”，两个文本框，名称分别为Text1和Text2、Text属性为空，一个命令按钮，名称为Command1，Caption属性为“输入”。设计完成后，双击Command1进入代码窗口，编写如下代码：
(2)根据题意，新建“标准EXE”工程，在窗体上添加一个标签，其名称为Label1，标题为“输入”，一个文本框，其名称为Text1、Text属性为空，一个命令按钮，其名称为Com-mand1、标题为“显示”。窗体设计完成后，双击Command1命令按钮，编写如下代码：
-
第20题：
在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序： Private Sub Form_Load0 Show Text1.Text="" Text2.Text="" Text1.SetFocus End Sub Private Sub Text1 Change() Text2.Text=Mid(Text1.Text,8) End Sub 程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是( )。
A．BeijingChina
B．China
C．Beijing
D．BeijingC
正确答案：B
-
第21题：
在窗体中添加一个命令按钮,名称为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
-
第22题：
在名为”Forml”的窗体上添加三个文本框和一个命令按钮，其名称分别为”Textl”、”Text2”、”Text3”和”Commandl”，然后编写如下两个事件过程：
正确答案：
510【解析】本题考查“ ”运算符的使用。“ ”运算符可以用于计算两个数之和，也可以使用“ ”运算符连接两个字符串，“ ”，运算符两端的表达式的基本类型决定了“ ”运算符所做的操作，如果两个表达式都是数值或者一个表达式是数值，另一个表达式是字符串，则“ ”代表相加；如果两个表达式都是字符串则“ ”代表字符串的连接。本题中，由于文本框的Text属性值的类型是字符串，所以“ ”运算符连接的是字符串…5和字符串“10”，所以本题答案为510。 -
第23题：
在窗体（Name属性为Form1）上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（Name属性为Command1），然后编写如下两个事件过程：
程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入“同学们，”和“你们好”，然后单击命令按钮，则输出结果为多少？
程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入“同学们，”和“你们好”，然后单击命令按钮，则输出结果为：同学们，你们好。
略 -
第24题：
单选题在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：程序运行后，如果在文本框Text1中输入China Beijing，则在文本框Text2中显示的内容是（ ）。AChina Beijing
BChina
CBeijing
DChinaB
正确答案： A解析：
程序运行后，在文本框Text1中输入字符后，会触发它的Change事件，通过中部截取函数Mid把文本框Text1中的内容从第6个字符“B”开始截取后面的字符，得到“Beijing”字符串，然后把截取的字符串在Text2中显示出来。
程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入“同学们，”和“你们好”，然后单击命令按钮，则输出结果为多少？