*第46 套上机考试试题

一、基本操作题

**请根据以下各小题的要求设计Visual Basic 应用程序

(包括界面和代码)。

(1)在名称为Form1、标题为“框架练习”的窗体上

*画一个名称为Frame1、标题为“字体”的框架控件；在框

架中画两个单选按钮，名称分别为Option1、Option2，标题

分别为“宋体”、“黑体”，标题在单选按钮的左边。运行后

的窗体如图2-1 所示。

注意：存盘时，将文件保存至考生文件夹下，且窗体文

件名为sjt1.frm，工程文件名为sjt1.vbp。

图2-1

***(2)在名称为F orm1 窗体上，画一个名称为Image1

的图像框，在其中显示考生文件夹下的图片“pic2.jpg”，并

设置适当属性使得图像框尺寸变化时图片尺寸可随之变化。

再画一个水平滚动条和一个垂直滚动条，名称分别为

**HScroll1、VScroll1，它们的刻度范围都是1～3。如图2-2

(a)所示。要求如下：

①定义两个窗体级变量：length、high，并编写窗体

***的Form_Load 事件过程，使length、high 分别等于图像

框的宽、高；

②编写适当的事件过程，使得移动两个滚动条上的滚

动块时，以刻度值作为图像框初始尺寸的倍数改变图像框

**相应方向的尺寸。例如：HScroll1 的滚动块在刻度值为 2

的位置时，图像框的宽为初始宽度的 2 倍。如图2-2(b)

所示。对于垂直滚动条也相同。

注意：存盘时，将文件保存至考生文件夹下，且窗体

*文件名为sjt2.frm，工程文件名为s jt2.vbp。要求程序中的

两个变量必须是length、high，此外不能再使用其他变量，

除Form_Load 事件过程外，其他每个事件过程中只能写一

条语句。

*(a)(b)

图2-2

二、简单应用题

(1)考生文件夹下的工程文件sjt3.vbp 中有一个菜单、

两个标签和两个文本框。程序运行时，用鼠标右键单击窗体

会弹出一个弹出式菜单(如图2-3 所示)。当选中“计算100

以内自然数之和”菜单项时，将计算100 以内自然数之和并

放入Text1 中；当选中“计算7！”菜单项时，将计算7！并

放入Text2 中。在给出的窗体文件中已经有了全部控件，但

程序不完整。请将事件过程中的注释符去掉，把？改为正确

的内容，以实现上述程序功能。

注意：考生不得修改窗体文件中已经存在的控件和程

序，最后将程序按原文件名存盘。

图2-3

***(2)考生文件夹下的工程文件sjt4.vbp 中有如图所示的控件。程序功能如下：程序运行时，在Text1 中输入

一个商品名称，在Text2 中输入一个数量，单击“计算”按

钮，则会在列表框中找到该商品的单价，乘以数量后显示在Text3 中(如图2-4 所示)；若输入的商品名称是错误的，则

*在Text3 中显示“无此商品”(为方便编程，列表框中的每

个单价均为 4 位(含小数点))。请将事件过程中的注释符去掉，把？改为正确的内容，以实现上述程序功能。

注意：考生不得修改窗体文件中已经存在的控件和程

序，最后将程序按原文件名存盘。

图2-4

三、综合应用题

考生文件夹下的工程文件sjt5.vbp 中的窗体如图2-5 所示。考生文件夹下的随机文件in5.dat 中有20 条记录，每条

记录含姓名和三个分数(均为100 以内的正整数)。在程序

中已经定义了类型Recordtype，此类型变量可以存放一条记

录。要求如下：

①请为“计算最大最小值”按钮编写Click 事件过程，

其功能是：读取文件中的记录，计算每人的总分，找出其中

最大总分和最小总分，分别放入变量maxval，minval 中(这

两个变量已经给出，不得修改)。

②运行程序，单击“计算最大最小值”按钮后再单击“存盘”按钮。

注意：考生不得修改窗体文件中已经存在的控件和程

序，在结束程序运行之前，必须依次单击“计算最大最小值”、

1