计算机等级考试VB模拟训练题(十二)

第47套

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

（1）在名称为Form1的窗体上建立一个名称为Text1的文本框，一个名称为Cmd1，标题为“输出”的命令按钮（如图所示）。要求程序运行后，在文本框输入几个字符，在单击“输出”按钮，则在窗体上显示文本框中的的文字。*注意：1）在程序中不能使用任何变量。2）保存时必须存放在考生文件夹下，窗体文件名为lq1.frm，工程文件名为lq1.vbp。

（2）在名称为Form1的窗体上建立二个名称分别为Cmd1、Cmd2，标题为“按钮一”、“按钮二”的命令按钮（如图所示）。要求程序运行后，如果单击“按钮一”，则把“按钮二”移到“按钮一”上，使两个按钮重合。*注意：1）在程序中不得使用任何变量（必须通过属性设置来移动控件）。2）保存时必须存放在考生文件夹下，窗体文件名为lq2.frm，工程文件名为lq2.vbp

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

（1）在考生文件夹中有工程文件lq5.vbp及其窗体文件lq5.frm，该程序是不完整的。请在有？号的地方填入正确内容，然后删除？及所有注释符（即'号）但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下：在窗体上有三个名称分别为Text1、Text2、Text3的文本框，一个名称为C1，标题为“计算”的命令按钮（如图所示）。要求程序运行后，在Text1和Text2中分别输入两个整数，单击“计算”按钮后，可把两个整数之间的所有整数（含着两个整数）累加起来并在Text3中显示出来。

（2）在窗体上建立一个名称为Text1的文本框，建立一个名称为Cmd1，标题为“计算”的命令按钮（如图所示）。要求程序运行后，如果单击“计算”按钮，则求出100-200之间所有可以被3整除的数的总和，在文本框中显示出来，并把结果存入考生文件夹下的out.txt文件中。注意，在考生的文件夹下有一个mode.bas标准模块，该模块中提供了保存文件的过程putdata，考生可以直接调用。*注意：保存时必须存放在考生文件夹下，窗体文件名为lq6.frm。工程文件名为lq6.vbp,结果存入out.txt文件。

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

在名称为Form1的窗体上建立一个文本框（名称为Text1，MultiLine属性为True，ScrollBars属性为2）和两个命令按钮（名称分别为Cmd1和Cmd2，标题分别为"读入数据"和"排序显示保存"）（如图所示）。程序运行后，如果单击"读入数据"按钮，则读入"in.txt"文件中的100个整数，放入一个数组中（数组下界为1）；如果单击"排序显示保存"按钮，则对这100个整数按从小到大进行排序，把排序后的全部数据在文本框Text1中显示出来，然后存入考生文件夹中的文件"result.txt"中（在考生的目录下有标准模块prog.bas过程可以把指定个数的数组元素存入result.txt文件，考生可以把该模块文件添加到自己的工程中）。注意：文件必须存放在考生文件夹下，窗体文件名为lq7.frm，工程文件名为lq7.vbp，排序结果存入result.txt文件，否则没有成绩。

第48套

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

（1）在名称为Form1的窗体上建立一个名称为P1的图片框和二个命令按钮，名称分别为Cmd1、Cmd2，标题分别为“输出”、“清除”（如图所示）。要求程序运行后，每单击一次“输出”按钮，不使用任何变量而直接在图片框中显示小写字母“red”；如果单击“清除”按钮，则清除图片框中的内容。*注意：保存时必须存放在考生文件夹下，窗体文件名为lq3.frm，工程文件名为lq3.vbp。

（2）在名称为Form1的窗体上建立一个名称为List1的列表框。要求：在程序运行后，通过

Form_Load()事件过程加载窗体时，执行语句List1.AddItem"AAA"之后，每当单击某个列表项时，都执行语句List1.AddItemList1.Text一次（如图所示）。*注意：保存时必须存放在考生文件夹下，窗体文件名为lq4.frm，工程文件名为lq4.vbp。

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

（1）在名称为Form1的窗体上建立两个主菜单，其标题分别为“文件”和“帮助”名称分别为vbFile

和vbHelp，在“文件”菜单下有三个子菜单项，分别为“新建”、“打开”和“存盘”（其名称分别为vbNew、vbOpen和vbSave）。要求程序运行后，如果选中“文件”下的某个菜单项，则通过MsgBox对话框显示该菜单项的标题（如图所示）。*注意：保存时必须存放在考生文件夹下，窗体文件名为lq5.frm，工程文件名为lq5.vbp。

（2）在窗体上建立一个名称为Text1的文本框，再建立一个名称为Cmd1，标题为“计算”的命令按钮（如图所示）。要求程序运行后，单击命令按钮，将计算100-200之间所有素数之和，在文本框中显示结果，同时把结果存入文件out.txt中。（在考生文件夹中有标准模块mode.bas,其中的putdata过程可以把结果存入文件，而isprime函数可以判断整数x是否为素数，如果是素数，则函数返回True，否则返回False，考生可以把该模块文件添加到自己的工程中。）*注意：保存时必须存放在考生文件夹下，窗体文件名为lq6.frm，工程文件名为lq6.vbp，结果存入out.txt文件。

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

在名称为Form1的窗体上建立一个文本框（名称为Text1，MultiLine属性为True，ScrollBars属性为2）和两个命令按钮（名称分别为Cmd1和Cmd2，标题分别为“读入数据”和“保存数据”）（如图所示）。程序运行后，如果单击“读入数据”按钮，则读入“in.txt”文件中的100个整数，放入一个数组中（数组下界为1），并在文本框Text1中显示出来；如果单击“保存数据”按钮，则把数组中的前50个数据在文本框Text1中显示出来，并存入考生文件夹中的文件“result.txt”中，（考生文件夹中有标准模块prog.bas，其中的putdata过程可以把指定个数的数组元素存入result.txt文件，考生可以把该模块文件添加到自己的工程中）。注意：文件必须存放在考生文件夹下，窗体文件名为lq7.frm，工程文件名为lq7.vbp结果存入result.txt文件，否则没有成绩。