1、VB 机试-试卷 66 及答案解析(总分：12.00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：4.00)1.基本操作题（）（分数：2.00）_2.在名为 Form1 的窗体上绘制一个名为 Chk1 的复选框数组，含 3 个复选框，它们的标题依次为First、Second 和 Third，其下标分别为 0，1，2。初始状态下，Second 和 Third 为选中状态。运行后的窗体如下图所示。 （分数：2.00）_二、简单应用题(总题数：2，分数：4.00)3.简单应用题（）（分数：2.00）_4.在考生文件夹中有工程文件 execise83.vbp 及窗体文件 execise83
2、.finn。在名为 Form1 的窗体中有一个名为 Image1 的图像框，有一个名为 Timer1 的计时器，有一个名为 HS1 的滚动条，还有一个名为Cmd1、标题为 Begin 的命令按钮。要求程序运行后，单击 Begin 按钮，则图像框中的图片根据计时器中设定的时间间隔交替变更，如果改变滚动条中滚动框的位置，则图片交替变换的速度也随之变化(如下图所示)。 （分数：2.00）_三、综合应用题(总题数：2，分数：4.00)5.综合应用题（）（分数：2.00）_6.在考生文件夹下有一个工程文件 sjl5vbp，其窗体上有三个标签、三个文本框和两个命令按钮，均使用默认名称。程序的功能是：如果单
3、击“读数据”命令按钮，则把考生文件夹下 in5dat 文件中两组已按升序方式排列的数(每组 30 个数)分别读入数组 A 和 B，并分别将它们显示在 Text1、Text2 中；如果单击“合并”命令按钮，则将 A、B 两个数组合并为另一个按升序方式排列的数组 C，并将合并后数组C 中的数据依升序方式显示在 Text3 中。窗体中给出了所有控件(如图 1-66 所示)以及“读数据”命令按钮的 Click 事件过程，请完善“合并”命令按钮的 Click 事件过程，使其实现上述功能。注意：不得修改已经存在的控件和程序，在结束程序运行之前，必须进行合并操作，且必须通过窗体右上角的“关闭”按钮结束程序，
4、否则无成绩。最后，程序按原文件名存盘。 （分数：2.00）_VB 机试-试卷 66 答案解析(总分：12.00，做题时间：90 分钟)一、基本操作题(总题数：2，分数：4.00)1.基本操作题（）（分数：2.00）_解析：2.在名为 Form1 的窗体上绘制一个名为 Chk1 的复选框数组，含 3 个复选框，它们的标题依次为First、Second 和 Third，其下标分别为 0，1，2。初始状态下，Second 和 Third 为选中状态。运行后的窗体如下图所示。 （分数：2.00）_正确答案：(正确答案： )解析：二、简单应用题(总题数：2，分数：4.00)3.简单应用题（）（分数：2.
5、00）_解析：4.在考生文件夹中有工程文件 execise83.vbp 及窗体文件 execise83.finn。在名为 Form1 的窗体中有一个名为 Image1 的图像框，有一个名为 Timer1 的计时器，有一个名为 HS1 的滚动条，还有一个名为Cmd1、标题为 Begin 的命令按钮。要求程序运行后，单击 Begin 按钮，则图像框中的图片根据计时器中设定的时间间隔交替变更，如果改变滚动条中滚动框的位置，则图片交替变换的速度也随之变化(如下图所示)。 （分数：2.00）_正确答案：(正确答案： )解析：三、综合应用题(总题数：2，分数：4.00)5.综合应用题（）（分数：2.00）
6、_解析：6.在考生文件夹下有一个工程文件 sjl5vbp，其窗体上有三个标签、三个文本框和两个命令按钮，均使用默认名称。程序的功能是：如果单击“读数据”命令按钮，则把考生文件夹下 in5dat 文件中两组已按升序方式排列的数(每组 30 个数)分别读入数组 A 和 B，并分别将它们显示在 Text1、Text2 中；如果单击“合并”命令按钮，则将 A、B 两个数组合并为另一个按升序方式排列的数组 C，并将合并后数组C 中的数据依升序方式显示在 Text3 中。窗体中给出了所有控件(如图 1-66 所示)以及“读数据”命令按钮的 Click 事件过程，请完善“合并”命令按钮的 Click 事件过
7、程，使其实现上述功能。注意：不得修改已经存在的控件和程序，在结束程序运行之前，必须进行合并操作，且必须通过窗体右上角的“关闭”按钮结束程序，否则无成绩。最后，程序按原文件名存盘。 （分数：2.00）_正确答案：(正确答案： 【操作步骤】 步骤 1打开考生文件夹下的本题工程文件 sjt5vbp。 步骤2：编写“合并”按钮的单击事件过程。 参考代码： Private Sub Command2_Click() 考生编写程序开始 ia=l； ib=l； ic=1 Do While ia= 30 And ib=30 If a(ia)=30 c(ic)=a(ia) ； ia=ia+1 ； ic=ic+1
8、Loop Do While ib=30 c(ic)=b(ib) ；ib=ib+1；ic=ic+1 Loop 考生编写程序结束 以下程序将合并后的数组 C 显示在 Text3 申 For k=l To 60 Text3=Text3+Str(c(k)+Space(2) Next k End Sub 步骤 3：运行程序，单击“读数据”按钮，然后单击“合并”按钮获得结果，然后通过窗体右上角的“关闭”按钮结束程序。 步骤 4：按要求将文件保存至考生文件夹中。)解析：解析： 数组使用相同的名字引用一系列变量，并用数字索引来识别它们。数组有上界和下界，数组的元素在上下界内是连续的。Visual Basic 对每一个索引值都分配空间，所以不要不切实际地声明一个太大的数组。在很多情况下，使用数组可以缩短和简化程序，因为可以利用索引值设计循环，高效处理多种情况。 根据题意，要求实现两个数组的有序合并，可以设置三个变量 ia、ib、ic 用于标识当前分别在三个数组中的当前元素下标，初值均为 l；接下来进行循环，分别比较 a(ia)和 b(ib)的大小，若 a(ia)
