计算机等级二级VisualBaisc上机试练习习题(4)
第4套上机考试试题一、基本操作题
下面出现的“考生文件夹”均为c：＼wexam\20060001。
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
1．在名称为Form1的窗体上建立一个名称为Text1的文本框，一个名称为Cmd1、标题为“输出”的命令按钮，如图4-1所示。要求程序运行后，在文本框输入几个字符，单击“输出”按钮，则在窗体上显示文本框中输入的字符。
注意：在程序中不能使用任何变量。保存时必须存放在考生文件夹下，窗体文件名为kt1.frm，工程文件名为kt1.vbp。
2．在名称为Forml的窗体上建立两个名称分别为Cmdl和Cmd2、标题分别为“按钮一”和“按钮二”的命令按钮，如图4-2所示。要求程序运行后，如果单击“按钮一”，则把“按钮二”移到“按钮一”上，使两个按钮重合，如图4-3所示。
http://www.examw.com/ncre/Files/2010-12/13/1434558421.jpg
图4-1
http://www.examw.com/ncre/Files/2010-12/13/1434555128.jpg
图4-2
http://www.examw.com/ncre/Files/2010-12/13/1434559116.jpg
图4-3
注意：在程序中不得使用任何变量(必须通过属性设置来移动控件)。保存时必须存放在考生文件夹下，窗体文件名为kt2.frm，工程文件名为kt2.vbp。
二、简单应用题
下面出现的“考生文件夹”均为c：＼wexam＼20060001。
1．在考生文件夹下有一个工程文件kt3.Vbp,窗体上已经有一个标签L1，请画一个单选按钮数组，名称为Op1，含三个单选按钮，它们的Index属性分别为0、1和2，标题依次为“飞机”、“火车”和“汽车”，再画一个名称为Text1的文本框。
窗体文件中已经给出了op1的click事件过程，但不完整，要求去摔程序中的注释符(即“'”号)，把程序中的“?”改为正确的内容，使得在运行时单击“飞机”或“火车”单选按钮时，在Text1中显示“我坐飞机去”或“我坐火车去”，单击“汽车”单选按钮时，在Text1中显示“我开汽车去”。程序运行界面如图4-4所示。
http://www.examw.com/ncre/Files/2010-12/13/1434551702.jpg
图4-4
http://www.examw.com/ncre/Files/2010-12/13/1434569669.jpg
图4-5
注意：不能修改程序中的其他部分。最后把修改后的文件按原文件名保存。
2．在窗体上建立一个名称为Textl的文本框，建立一个名称为Cmd1、标题为“计算”的命令按钮，如图4-5所示。要求程序运行后，如果单击“计算”按钮；则求出100-200之间所有能被3整除的数的总和，在文本框中显示出来，并把结果存入考生文件夹下的out.txt文件中(在考生的文件夹下有一个mode.bas标准模块，该模块中提供了保存文件的进程putdata，考生可以直接调用)。
注意：保存时必须存放在考生文件夹下，窗体文件名为kt4.frm， 工程文件名为kt4.vbp，结果存入out.txt文件。
三、综合应用题
下面出现的“考生文件夹”均为c：＼wexam\20060001。
在考生文件夹中有工程文件kt5．vbp及其窗体文件kt5．frm，该程序是不完整的，请在有“?”号的地方填入正确内容然能修改其他部分。
本题描述如下：
在名称为Form1的窗体上有一个文本框，名称为Text1，MultiLine属性为True，ScrollBars属性为2；两个命令按钮，名称分别为Cmd1和Cmd2，标题分别为“读入数据”和“排序并保存”，如图4－6所示。程序运行后，如果单击“读入数据”按钮，则读入in.txt文件中的100个整数，放入一个数组中(数组下界为1)；如果单击“排序并保存”按钮，则对这100个整数按从小到大进行排序，并把排序后的全部数据在文本框Text1中显示出来，然后存入考生文件夹中的文件result.txt中(在程序中的标准模块prog.bas过程可以把指定个数的数组元素存入result.txt文件中)。
http://www.examw.com/ncre/Files/2010-12/13/143456467.jpg
图4-6
注意：文件必须存放在考生文件夹下，窗体文件名为kt5.frm，工程文件名称为kt5.vbp，排序结果存入result.txt文件，否则没有成绩。
第4套参考答案与解析
一、基本操作题
1．【解析】本题主要考查文本框的基本操作。
(1)先建立界面并设置控件属性。程序中用到的控件及其属性见表4-1。
控件 属性设置值文本框 NameText1NameCmd1按钮 Caption输出 (2)通过命令按钮的Caption属性来设置其标题。文本框显示内容是用Text属性。
(3)单击命令按钮触发Cmd1_Click事件。
(4)在命令按钮的Click事件中使用Cls命令清空窗体原来内容。
(5)文本框显示内容是用Text属性。文本框中的内容通过其Text属性得到，在命令按钮的Click事件中利用Print方法将文本框中的内容输出，完成题目要求。
(6)参考程序如下：
http://www.examw.com/ncre/Files/2010-12/13/1434568346.jpg
(7)调试并运行程序。
(8)按题目要求存盘。
2．【解析】在窗体上建立好控件后，先设置控件的属性，再编写事件过程。
(1)建立界面并设置控件属性。程序中用到的控件及其属性见表4-2。
表4-2
控件 属性设置值NameCmd1按钮 Caption按钮一 NameCmd2按钮 Caption按钮二 (2)命令按钮的Caption属性用来设置其标题，单击命令按钮触发Click事件。
(3)本题考查的是如何设置按钮的摆放位置，涉及到对象的Left和Top属性。Left表示控件与所在窗体的左边之间的距离，Top表示控件与所在窗体的顶边之间的距离。让两个按钮位置重合只需将两个按钮的Left和Top设置相同即可。参考代码如下：
计算机等级二级VisualBaisc上机试练习习题(4)
http://www.examw.com/ncre/Files/2010-12/13/143456770.jpg(4)调试并运行程序。
(5)按题目要求存盘。
二、简单应用题
1．【解析】标签和单选按钮的标题均由各自的Caption属性设置。程序中需要检测的单选按钮的状态，这可以通过Value属性来实现，如果单选按钮被选中，则Value值为1，否则Value值为0。当建立控件数组时，系统给每个元素赋一个唯一的索引号(Index)，通过属性窗口的Index属性，可以知道该控件的下标是多少。在文本框中显示内容通过Text属性设置，其形式为：文本框名.Text=显示的内容,程序中用到了SelectCase语句，格式如下：
http://www.examw.com/ncre/Files/2010-12/13/1434564684.jpg
【解题步骤】
(1)建立界面并设置控件属性。程序用到的控件及其属性见表4．3。
表4-3
对象 属性设置值TextNameText1NameOp1(0)单选按钮 Caption飞机 NalrleOp10)单选按钮 Caption火车 NatneOp1(2)单选按钮 Caption汽车 NameLable!标签框 Caption请选择 (2)编写程序代码。
程序提供的代码：
http://www.examw.com/ncre/Files/2010-12/13/1434561266.jpg
(3)调试并运行程序。
(4)按题目要求存盘。
2．【解析】本题主要考查窗体上控件的基本应用。先在窗体上建立控件，再设置控件的属性。命令按钮的Caption属性用来设置其标题，单击命令按钮触发Click事件；在文本框中显示内容通过其Text属性来设置。
(1)建立界面并设置控件属性。程序中用到的控件及其属性见表4-4。
表4-4
控件 属性设置值NalTleCmd1按钮 Caption计算 文本框 NameText1 (2)打开代码窗口，研读程序，获得调用规则。
http://www.examw.com/ncre/Files/2010-12/13/143456923.jpg
(3)将用来存放结果的变量设计成Long型。
(4)能被3整除，即iMod 3=0
(5)参考代码如下：
http://www.examw.com/ncre/Files/2010-12/13/143456624.jpg
(6)调试并运行程序。
(7)按题目要求存盘</p>三、综合应用题
【解析】除了基本的操作外，本题涉及到的知识点主要有循环程序设计和数组的使用两个方面。先在窗体上建立控件，再设置控件属性，然后研读提供的代码，正确分析并完成程序。文本框显示的内容通过Text属性设置；按钮的标题通过Caption属性设置，单击命令按钮触发Click事件；在本题中涉及到文件的操作，读入顺序文件以顺序的方式打开，用“Input#”语句读取数据，另外需要注意的是对文件操作结束后，一定要关闭文件。
(1)文本框显示的内容通过Text属性设置，Multiline属性决定文本框是否可多行显示。若需要多行显示，则必须将Multiline属性设置为True，同时将Scrollbars属性设置为2。
(2)建立界面并设置控件属性。按钮的标题通过Caption属性设置，单击命令按钮触发Click事件。程序中用到的控件及屙性设置见表4-5。
表4-5
控件 属性设置值NameText1本框 Scrollbars2本框 MultilineTrueNameCmd1命令按钮 Caption读入数据 NameCmd2命令按钮 Caption排序显示保存 (3)打开代码窗口，得到如下代码：
标准模块代码
http://www.examw.com/ncre/Files/2010-12/13/1434574881.jpg
http://www.examw.com/ncre/Files/2010-12/13/1434573901.jpg
(4)分析代码。
①语句?#1，i(j)是与For语句配合，读入数据到数组I中，即：
Forj＝1 To 100
Input#1，i(j)
②语句flag=?设置初始标记，即：flag＝False
③语句Text1.?＝""是要先清理Text1中的内容，即：Text1.Text＝""
(5)完整的参考代码如下：
http://www.examw.com/ncre/Files/2010-12/13/1434575842.jpg
http://www.examw.com/ncre/Files/2010-12/13/1434579889.jpg
(6)调试并运行程序。
(7)按题目要求存盘。
页:
[1]