2016年计算机二级考试VF上机试题及答案

　　一、基本操作题

请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。

(1) 在Form1的窗体上画一个名称为Label1的标签，然后建立一个主菜单，标题为“时间”，名称为vbTime，该菜单有两个子菜单，其标题分别为“上午”和“下午”，名称分别为vbTimel和vbTime2。编写适当的事件过程，使程序运行后，如果单击“时间”菜单中的“上午”命令，则在标签中显示 “8：00—12：00”;如果单击“下午”命令，则标签中显示“12：00—18：00”。程序的运行情况如图19-1和图19-2所示。

注意：存盘时必须存放在考生文件夹下，工程文件名为，窗体文件名为。

(2) 在窗体上画一个文本框，名称为Text1，Text属性为空。再画一个列表框，名称为List1，通过“属性”窗口向列表框中添加3个项目，分别为“足球”、“篮球”和“排球”。编写适当的事件过程，使程序运行后，在文本框中输入一个字符串，如果双击列表框中的任一项，则把文本框中的.字符串覆盖到该项上。程序的运行情况如图19-3所示。

注意：存盘时必须存放在考生文件夹下，工程文件名为，窗体文件名为。

　　二、简单应用题

(1) 在考生文件夹下有工程文件及窗体文件，该程序是不完整的。在窗体中有一个RichText文本框控件和一个文本框控件，名称分别为RichTextBox1和Text1，两个命令按钮，名称分别为Command1和Command2，标题分别为“读入文件”、“统计字数”。要求程序运行后，单击“读入文件”按钮，将考生文件夹下的的内容显示到PdchTextBoxl中;单击“统计字数”按钮统计 RichTextBox1中有多少个字符，将结果显示在Text1中。程序运行界面如图19-4所示。

注意：请在有“?”的地方填入正确内容，然后删除“?”及代码前的所有注释符“'”，但不能修改其他部分。存盘时不得改变文件名和文件夹。

(2) 在考生文件夹下有工程文件sj4.vbp及窗体文件sj4.frm，该程序是不完整的。在窗体上有一个名为Image1的图像框，要求程序运行后，载入考生文件夹下的temp.bmp图片，鼠标左键单击图像框中的图片，则图片变大;鼠标右键单击图像框中的图片，则图片变小。运行界面如图19-5所示。

注意：请在有“?”的地方填入正确内容，然后删除“?”及代码前的所有注释符“'”，并设置适当的属性，但不能修改其他部分。存盘时不得改变文件名和文件夹。

　　三、综合应用题

在名称为Form1的窗体上有一个Label控件和两个命令按钮，数据文件存放员工的编号、姓名、工资。自定义一个数据类型 person，字符型数据定长为12;按“开始”按钮后，从考生文件夹下的中读出所有数据并写入考生文件夹下的 文件中;执行完毕，“开始”按钮变成“完成”，且无效(变灰)，如图19-6所示。

注意：去掉程序中的注释符“'”，把程序中的“?”改为正确的内容。考生的工程文件以文件名存盘，窗体文件以文件名存盘。

　　【参考答案及解析】

一、基本操作题

(1)根据题意，新建“标准EXE”工程，在窗体上添加一个标签，名称为Label1，Caption属性为空，再按“Ctrl+E”组合键打开菜单编辑器，添加以下菜单项：

设置完成后，单击菜单进入代码编写窗口，分别编写vbTime1和vbTime2的处理函数，具体如下：

(2)根据题意，新建“标准EXE”工程，将一个列表框控件和一个文本框控件添加到窗体中，列表框的名称设为List1，单击其List属性，在其中添加“足球”、“篮球”和“排球”，每输入完一项按“Ctrl+Enter”组合建输入下一项，当输入完成后，按回车键。文本框的名称为Text1、Caption属性为空。双击List1，进入代码编写窗口，具体代码如下：

二、简单应用题

(1)本题主要考查了RichTextBox控件的用法。Rich-TextBox控件可以用LoadFile和SaveFile方法打开或保存文件，LoadFile方法能将RTF文件或文本文件装入控件，其格式为：对象.LoadFile文件标志符[，文件类型];统计字符的个数可用Len(要统计的内容)函数。

根据题意，将一个RichTextBox1文本框和一个Text1文本框控件添加到窗体中，名称分别为RichTextBox1和Text1、Caption属性均为空，两个命令按钮的名称分别为Command1和Command2、Caption属性分别为“读入文件”和“统计字数”。双击Command1进入代码编写窗口，具体代码如下：

(2)判断鼠标左键还是右键可以通过图像框的Mouse-Up事件的Button参数来判断。MouseUp事件在释放鼠标按钮时发生。根据题意，将一个图像控件添加到窗体中，其名称为Image1、Picture属性中加载temp.bmp图片、Strech属性为True，双击图像框进入代码编写窗口，编写如下代码：

三、综合应用题

本题要利用EOF(　　)函数判断是否到文件末尾。根据题意，将一个标签控件和两个命令按钮添加到窗体中，标签控件的Caption属性为“从源文件./中读人数据，保存到目标文件./中”，命令按钮的名称分别为Command1和Command2，Caption分别为“开始”和“保存”，设置完成后双击Command1进入代码编写窗口，具体代码如下：