计算机等级二级VisualBaisc上机试练习习题(3)
第3套上机考试试题一、基本操作题
下面出现的“考生文件夹”均为c：＼wexam＼20060001。
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
1．在名称为Form1的窗体上建立一个名称为P1的图片框和两个命令按钮，名称分别为Cmd1和Cmd2，标题分别为“输出”和“清除”，如图3-1所示。要求程序运行后，每单击一次“输出”按钮，不使用任何变量而直接在图片框中显示小写字母load me；如果单击“清除”按钮，则清除图片框中的内容。
http://www.examw.com/ncre/Files/2010-12/13/143437791.jpg
图3-1
注意：保存时必须存放在考生文件夹下，窗体文件名为kt1.frm，工程文件名为kt1.vbp。
2．在名称为Forml的窗体上建立一个名称为Listl的列表框。要求程序运行后，通过Form Load0事件过程加载窗体时，执行语句List1.AddItem“AAA”，每当单击某个列表项时，都执行语句List1.Addltem Listt.Text一次，如图3-2所示。
http://www.examw.com/ncre/Files/2010-12/13/143439361.jpg
图3-2
注意：保存时必须存放在考生文件夹下，窗体文件名为kt2.frm，工程文件名为kt2.vbp。
二、简单应用题
下面出现的“考生文件夹”均为c：＼wexam\20060001。
1．在名称为Form1的窗体上建立两个主菜单，其标题分别为,“文件”和“帮助”，名称分别为vbFile和vbHelp，“文件”菜单下有三个子菜单项，标题分别为“新建”、“打开”和“存盘”，名称分别为vbNew、vbOpen和vbSave。要求程序运行后，如果选中“文件”下的某个菜单项，则通过MsgBox对话框显示该菜单项的标题，如图3－3所示。
注意：保存时必须存放在考生文件爽下，窗体文件名为kt3.frm，工程文件名为kt3.vbp。
2．在窗体上建立一个名称为Text1的文本框，再建立一个名称为Cmd1、标题为“计算”的命令按钮，如图3-4所示。要求程序运行后，单击命令按钮，将计算100～200之间所有素数之和，并在文本框中显示结果，同时把结果存入文件out.txt中(在考生文件夹中有标准模块mode.bas，其中的putdata过程可以把结果存入文件，而isprime函数可以判断整数X是否为素数，如果是素数，则函数返回True，否则返回False，考生可以把该模块文件添加到自己的工程中)。
注意：保存时必须存放在考生文件夹下，窗体文件名为kt4.frm，工程文件名为kt4.vbp,结果存入result.txt文件，否则没有成绩。
三、综合应用题
下面出现的“考生文件夹”均为c：＼wexam＼20060001。
在考生文件夹中有工程文件kt5.vbp及其窗体文件kt5.frm，该程序是不完整的，请在有“?”号的地方填入正确内容，然后删除“?”及所有注释符(即“'”号)，但不能修改其他部分。
本题描述如下：
在名称为Form1的窗体上有一个文本框，名称为Text1，MultiLine属性为True，ScrollBars属性为2；两个命令按钮，名称分别为Cmd1和Cmd2，标题分别为“读入数据”和“保存数据”，如图3-5所示。程序运行后，如果单击“读入数据”按钮，则读入“in.txt，，文件中的100个整数，放入一个数组中(数组下界为1)，并在文本框Text1中显示出来；如果单击“保存数据”按钮，则把数组中的前50个数据在文本框Textl中显示出来，并存入考生文件夹中的result.txt文件中(考生文件夹中有标准模块prog.bas，其中的putdata过程可以把指定个数的数组元素存入result.txt文件)。
注意：保存时必须存放在考生文件夹下，窗体文件名为kt5.frm，工程文件名为kt5.vbp，结果存入out.txt文件，否则没有成绩。
http://www.examw.com/ncre/Files/2010-12/13/143439383.jpg
图3-3
http://www.examw.com/ncre/Files/2010-12/13/143431994.jpg
图3-4
http://www.examw.com/ncre/Files/2010-12/13/143445512.jpg
图3-5
第3章参考答案与解析
一、基本操作题
1．【解析】本题主要考查图片框控件的基本操作。命令按钮的标题通过Caption属性设置，单击命令按钮触发Click事件；打印信息用Print方法，清除用Cls方法。题目要求在图片框中打印信息，所以在编写代码时应指定Print方法和Cls方法的使用对象。
在窗体上建立好控件后，先设置控件属性，再编写事件过程。
(1)建立界面并设置控件属性。程序用到的控件及其属性见表3-1。
表3－1
控件 属性设置值NameCmd1命令按钮 Caption输出 NameCrod2命令按钮 Caption清除 图片框 NameP1 (2)命令按钮Cmd1触发Click事件，打印信息用Print方法。题目要求在图片框中打印信息，所以在编写代码时，应指定Print方法使用对象。
http://www.examw.com/ncre/Files/2010-12/13/143442784.jpg
(3)清除用Cls方法。题目要求清除图片框中的信息，所以在编写代码时，应指定Cls方法的使用对象。
http://www.examw.com/ncre/Files/2010-12/13/143441864.jpg
(4)调试并运行程序。
(5)按题目要求存盘。
2．【解析】本题主要考查列表框的基本操作，列表框用于在很多项目中做出选择的操作。向列表框中添加项目既可以在属性窗口中进行，也可以在程序代码中进行。
在窗体上建立好列表框后，先设置属性，再编写事件过程。
(1)建立界面并设置控件属性。程序中只用到1个列表框控件。在窗体上画出列表框，其Name属性默认为List1。
(2)在窗体的Load事件中添加List1.Addltem”AAA”语句使程序开始运行时在列表框中添加AAA。参考代码如下：
http://www.examw.com/ncre/Files/2010-12/13/143448813.jpg
(3)单击列表框中的项目触发Click事件，题目要求使用Addltem方法给列表框添加项目，所以应该将List1.AddItem的List1.Text语句写入列表框的Click事件中。
计算机等级二级VisualBaisc上机试练习习题(3)
参考代码如下：http://www.examw.com/ncre/Files/2010-12/13/143444772.jpg
(4)调试并并运行程序。
(5)按题目要求存盘。
二、简单应用题
1．【解析】本题主要考查菜单编辑器的使用。在Visual Basic中，菜单项通过菜单编辑器来建立；选择菜单则是触发其Click事件。MsgBox函数在对话框中显示消息，等待用户单击按钮，并返回一个Integer告诉用户单击哪一个按钮。
语法：MsgBox(prompt[，buttons][，title][，helpfile，context])
MsgBox函数的语法具有以下几个命名参数：
prompt：必需参数；字符串表达式，作为显示在对话框中的消息。
buttons：可选参数；数值表达式是值的总和，指定显示按钮的数目及形式。
title：可选参数；在对话框标题栏中显示的字符串表达式。如果省略title，则将应用程序名放在标题栏中。
helpfile：可选参数：字符串表达式，识别用来向对话框提供上下文相关帮助的帮助文件。
context：可选参数；数值表达式，通过帮助文件的作者指定给适当的帮助主题的上下文编号。
(1)建立菜单项；程序中用到的菜单项及其属性见表3-2。
表3-2
标题 名称内缩符号文件 vbFile0新建 vbNew1打开 vbOpen1存盘 vbSave1帮助 vbHelpO (2)为各个菜单项编写事件处理程序；
参考代码如下：
http://www.examw.com/ncre/Files/2010-12/13/143448346.jpg
(3)调试并运行程序。
(4)按题目要求存盘。
2．【解析】判断某数是否为素数，主要用到选择结构程序设计的思想。在窗体上建立好控件后，先设置控件的属性值，再编写事件过程。文本框中显示的内容通过Text属性设置，命令按钮的标题通过Captilon属性设置，单击命令按钮触发Click事件。
(1)建立菜单项。程序中用到的控件及其属性见表3-3。
表3-3
控件 属性设置值文本框 NameText1NalTleCmd1按钮 Caption计算 (2)打开代码窗口，研读给定的代码。
标准模块代码:
http://www.examw.com/ncre/Files/2010-12/13/143457649.jpg
(3)可以使用isprime函数判断整数X是否为素数。如果是，则将该素数计入。If isprime(i)Then temp=temp+i
(4)temp应声明为Long型。
(5)使用如下调用形式把结果存入文件out.txt中：putdata“out.txt”，temp
(6)Cmd1_Click()事件的参考代码如下：
http://www.examw.com/ncre/Files/2010-12/13/143456536.jpg
(7)调试并运行程序。
(8)按题目要求存盘。</p>三、综合应用题
【解析】除了考查基本操作外，本题主要考查的是数组的使用。
(1)文本框显示的内容通过Text属性设置，Multiline属性决定文本框是否可多行显示。若需要多行显示，必须将Multiline属性设置为True，同时将Scrollbars属性设置为2。
(2)建立界面并设置控件属性。按钮的标题通过Caption属性设置，单击命令按钮触发Click事件。程序中用到的控件及属性设置见表3-4。
表3-4
控件 属性设置值NameText1文本框 Scrollbars2MultilineTmeNalileCmd1命令按钮 Caption读入数据 NameCmd2命令按钮 Caption保存数据 (3)打开代码窗口，程序提供的代码如下：
http://www.examw.com/ncre/Files/2010-12/13/143468862.jpg
(4)研读代码，完成程序。
①语句Input#1，i(?)用与语句Forj=1 T0 100相配合读入数据，所以应为：Input#1，i(j)
②语句?#1是在打开文件之后。涉及到文件的操作，读入顺序文件以顺序的方式打开，用“Input#”语句读取数据，另外需要注意的是对文件操作完成后，一定要关闭文件。即：Close#1
③语句Text1.Text=?用来初始化文本框Text1，使其开始时为空。即：Text1.Text=“”
(5)完整的参考代码如下：
页:
[1]