*第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
