在名为“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)中显示的内容为【 】。
第1题:
(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命令按钮,编写如下代码:
第2题:
在名为Form1的窗体上绘制两个标签(名称分别为Lab1和Lab2,标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Text1和Text2,Text属性均为空白)和一个命令按钮(名称为Cmd1,标题为Display)。然后编写命令按钮的Click事件过程,使程序运行后,在两个文本框中分别输入姓名和年龄,然后单击命令按钮,则在窗体上显示两个文本框中的内容,如下图所示。
注意:
程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为 execise57.vbp,窗体文件名为execise57.frm。
第3题:
在名为”Forml”的窗体上添加三个文本框和一个命令按钮,其名称分别为”Textl”、”Text2”、”Text3”和”Commandl”,然后编写如下两个事件过程:
第4题:
在考生文件夹中有一个工程文件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文本框中显示连接后的内容。修改后的文件仍按原文件名保存在原文件夹下。
注意:
不得修改已经给出的程序。在结束程序运行之前,必须选中一个单选按钮,并单击窗体。退出程序时必须通过单击窗体右上角的关闭按钮,否则可能无成绩。
第5题:
在窗体(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.空值