计算机等级VB模拟训练题

1. 基本操作（2小题，每小题15分，共计30分）

（1）在名称为Form1的窗体上画一个水平滚动条， 其名称为HScrolH ,然后通过属性窗口设 置窗体和滚动条的属性，实现如下功能：

1）窗体标题为 设置滚动条属性”2）滚动条所能表

示的最小值和最大值分别为 0和2003）程序运行后，单击滚动条两端的箭头时，滚动框移动 的增量值为24）程序运行后，单击滚动框前面或后面的部位时， 滚动框移动的增量值为105）

滚动框的初始位置为100程序的运行情况如图所示。 要求：不要编写任何代码。*注意：存盘

时必须存放在考生文件夹下，工程文件名为

lq1.vbP ，窗体文件名为Iq1.frm 。

五设畳滝动第雇性

（2）在名称为Form1的窗体上画一个文本框，其名称为 Text1 （如图1所示），编写适当的事 件过程。程序运行后，如果单击窗体，则可使文本框移到窗体的左上角；而如果在文本框中 输入信息，则可使文本框移到窗体的右上角。程序的运行情况如图 2所示。要求：不得使用

任何变量；只允许通过修改属性的方式移动文本框。 *注意：存盘时必须存放在考生文件夹

下，工程文件名为lq2.vbP ，窗体文件名为lq2.frm 。

图1

2.简单应用（2小题，每小题20分，共计40分）

（1）在考生文件夹下有一个工程文件 Iq3.vbP ，相应的窗体文件为Iq3.frm 。其功能是产生 20个0〜1000的随机整数，放入一个数组中，然后输出这20个整数中大于500的所有整数之和。 程序运行后，单击命令按钮（名称为 Commanc ，标题为 输出大于500的整数之和”，即可

求出这些整数的和，并在窗体上显示出来（如图所示）。这个程序不完整，请把它补充完整， 并能正

确运行。要求：去掉程序中的注释符， 把程序中的？改为正确的内容，使其实现上述

功能，但不能修改程序中的其他部分。

SL Forml

■ ■ ilimil im Illi niBiiiHiiiBi!-iBiiiniiBiiriiii iri ilimil ■■■ I

最后把修改后的文件按原文件名存盘。

图2

（2）在考生文件夹下有一个工程文件Iq4.vbP，相应的窗体文件为Iq4.frm ，在窗体上有一

个命令按钮和一个文本框。程序运行后，单击命令按钮，即可计算出0〜100范围内不能被7 整除的所有整数的和，并在文本框中显示出来。在窗体的代码窗口中，已给出了部分程序，

其中计算不能被7整除的整数的和的操作在通用过程Fun中实现，请编写该过程的代码。要求: 请勿改动程序中的任何内容，只在FunctionFun（）和EndFunction之间填入你编写的若干语

句。最后把修改后的文件按原文件名存盘。

3.综合应用（1小题，计30分）

在考生文件夹下有一个工程文件lq5.vbP，相应的窗体文件为lq5.frm，此外还有一个名为

datai n.txt 的文本文件，其内容如下：32437658281298573142536475869713243546576879805937 程序运行后，单击窗体，将把文件

datain.txt 中的数据输入到二维数组Mat中，在窗体上按5行、5列的矩阵形式显示出来，然

后计算矩阵第三行各项的和，并在窗体上显示出来，如图所示。在窗体的代码窗口中，已给出了部分程序，这个程序不完整，请把它补充完整，并能正确运行。要求：去掉程序中的注释符，把程序中的？改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。

最后把修改后的文件按原文件名存盘。

^^Forvn

$加矩阵対：

4=37&se

1230ET31

53&47586

1324354G

66T9eo59

第三行各顶的和

3T5

为：

1.基本操作（2小题，每小题15分，共计30分）

（1 ）在名称为Form1的窗体上画一个文本框，其名称为Text1，然后通过属性窗口设置窗体

和文本框的属性，实现如下功能：1）在文本框中可以显示多行文本2）在文本框中显示垂直

滚动条3）文本框中显示的初始信息为程序设计”4）文本框中显示的字体为三号规则黑体5）窗体的标题为设置文本框属性”完成设置后的窗体如图所示。要求：不编写任何代码。*注意：存盘时必须存放在考生文件夹下，工程文件名为lq1.vbP，窗体文件名为lq1.frm 。

（2）在名称为Formi的窗体上画两个命令按钮（见图 1）,其名称分别为 Cmd和Cmd2编写适当的事件过程。程序运行后，如果单击命令按钮 Cmd1则可使该按钮移到窗体的左上角（只允许通过修改属性的方式实现）；如果单击命令按钮Cmd2则可使该按钮在长度和宽度上各

扩大到原来的2倍。程序的运行情况如图2所示。要求：不得使用任何变量。*注意：存盘时

必须存放在考生文件夹下，工程文件名为Iq2.vbP，窗体文件名为Iq2.frm。

图1

2. 简单应用（2小题，每小题20分，共计40分）

（1）在考生文件夹下有一个工程文件 Iq3.vbP ，相应的窗体文件为Iq3.frm 。其功能是产生 30个 0〜1000的随机整数，放入一个数组中，然后输出其中的最大值。程序运行后，单击命 令按钮（名称为Command1标题为输出最大值”，如图所示），即可求出其最大值，并在窗 体上显示出来。这个程序不完整，请把它补充完整，并能正确运行。要求：去掉程序中的注 释符，把程序中的？改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。

最后把修改后的文件按原文件名存盘。

（2）在考生文件夹下有一个工程文件 Iq4.vbP ，相应的窗体文件为Iq4.frm ，在窗体上有一 个命令按钮和一个文本框。程序运行后，单击命令按钮，即可计算出 0〜1000范围内能被5

整除或能被7整除的整数的个数，并在文本框中显示出来。在窗体的代码窗口中，已给出了 部分程

序，其中计算能被 5整除或能被7整除的整数的个数的操作在通用过程 Fun 中实现，请

编写该过程的代码。 要求：请勿改动程序中的任何内容， 只在FunctionFun （）和EndFunction

之间填入你编写的若干语句。最后把修改后的文件按原文件名存盘。

3. 综合应用（1小题，计30分） 在考生文件夹下有一个工程文件

lq5.vbP ，相应的窗体文件为lq5.frm ，此外还有一个名为

datain.txt 的文本文件，其内容如下：

32437658281298573142536475869713243546576879805937 程序运行后，单击窗体，将把文件 datain.txt 中的数据输入到二维数组 Mat 中，在窗体上按5行、5列的矩阵形式显示出来，并 输出矩阵左上-右下对角线上的数据，

如图所示。在窗体的代码窗口中，

已给出了部分程序，

这个程序不完整，请把它补充完整，并能正确运行。要求：去掉程序中的注释符，把程序中 的？改为正确的内容， 文件按原文件名存盘。

韧始矩阵为:

左上

Z 聲巴洱

-SI

■1盼1

Citdl

Cmdl

Cmd2

使其实现上述功能， 但不能修改程序中的其他部分。 最后把修改后的