问答题注意：下面出现的“考生文件夹”均为c：/wexam/25160001。请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在Form1的窗体上建立一个主菜单，标题为“操作”，名称为Op，该菜单有两个子菜单，其标题分别为“显示”和“清除”，其名称分别为Dis和Clea。编写适当的事件过程，程序运行后，如果单击“操作”菜单中的“显示”命令，则在窗体上显示“等级考试”；如果单击“清除”命令，则清除窗体上显示的内容。程序的运行情况如图14-1所示。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。(2)在Form1的窗体上画一个标签，其名称为Lab1；再画一个列表框，其名称为L1，通过属性窗口向列表框中添加若干个项目，每个项目的具体内容不限，编写适当的事件过程。程序运行后，如果双击列表框中的任意一项，则把列表中的项目数在标签中显示出来。程序中不准使用任何变量，运行情况如图14-2所示。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。

问答题有一个工程文件ylc6.vbp，请在窗体中画一个组合框和一个命令按钮。程序的功能是在运行时，如果在组合框中输入一个项目并单击命令按钮，则搜索组合框中的项目；如果已有此项，则弹出提示：“已有此项”，之后清除输入的内容。界面如图20所示。注意：存盘时必须存放在考生文件夹下，工程文件名为ylc6.vbp，窗体文件名为ylc6.frm。

问答题在窗体Form1上建立3个菜单(名称分别为vbRead、vbCalc和vbSave，标题分别为“读数”、“计算”和“存盘”)，然后绘制一个文本框(名称为Text1，MultiLine属性设置为True，ScrollBars属性设置为2)，如下图所示。程序运行后，如果执行“读数”命令，则读入in45.txt文件中的100个整数，放入一个数组中，数组的下界为1；如果执行“计算”命令，则把该数组中下标为奇数的元素在文本框中显示出来，求出它们的和，并把所求得的和在窗体上显示出来；如果执行“存盘”命令，则把所求得的和存入考生文件夹下的out45.txt文件中。在考生文件夹下有一个工程文件sj5.vbp，考生可以装入该文件。窗体文件si3.frm中的ReadData过程可以把in45.txt文件中的100个整数读入Art数组中；而WriteData过程可以把指定的整数值写到考生文件夹指定的文件中(整数值通过计算求得，文件名为out45.txt)。注意：考生不得修改窗体文件中已经存在的程序。存盘时，工程文件名仍为sj5.vbp，窗体文件名仍为sj5.frm。

问答题在考生文件夹下有一个工程文件sit5．vbp，窗体上有两个命令按钮，标题分别是“读数据”和“统计”，请添加一个名称为Label1、标题为“回文个数为”的标签和一个名称为Text1，初始内容为空的文本框，如图所示。程序功能如下：①单击“读数据”按钮，则将考生文件央下in5．dat文件的内容读到变量s中；②单击“统计”按钮，则统计in5．dat文件(该文件中仅含由空格间隔开的宁符串)中回义的个数，并将统计的回文个数显示在Text1文本框内(所谓同文是指顺读与倒读都一样的字符串，如“recycer”)。“读数据”和“统计”按钮的Click事件过程已经给出，请完善foundhuiwen过程的功能，实现上述程序功能。注意：考生不得修改窗体文件中已存在的控件和程序，在结束程序运行之前，必须先进行统计，且必须用窗体右上角的关闭按扭结束程序，否则无成绩。最后，程序按原文件名存盘。

问答题在考生文件夹下有一个工程文件vbsj5．vbp，请先装入该工程文件，然后完成以下操作：在名称为Forml的窗体上画两个命令按钮，其名称分别为cmdRead和cmdCal，标题分别为“读入数据”和“汁算保存”(如图2．42所示)。程序运行后，如果单击“跌入数据”按钮，则调用题目所提供的RcadData1和ReadData2过程读入in51．txt和in52．txt文件中的各20个整数，分别放入Aπ1和Aπ2两个数组中，如果单击“计算保存”按钮，则把两个数组中对应下标的元素相减，其结果放入第三个数组中(即：第一个数组的第n个元素减去第二个数组的第n个元素，其结果作为第三个数组的第n个元素。这里的n为1、2、…、20)，最后计算第三个数组各元素之和，把所求得的和在窗体上显示出来；并调用题目中给出的WriteData过程将所求得的和存入考生文件夹下的0ut5．dat文件中。注意：考生不得修改窗体文件中已经存在的程序，且必须执行此程序一次，最后把修改后的文件以原来的文件名存盘。

问答题在考生文件夹下有一个工程文件sit5．vbp，窗口有2个名称分别为Command1和Command2、标题分别为“读数据”和“排序”的命令按钮，有2个标题分别为“数组A”和“数组B”的标签。请将窗体标题设置为“完全平方数排序”；再画2个名称分别为Text1和Text2、初始内容都为空的文本框，并且可多行显示，有垂直滚动条，如图3—55所示。程序功能如下：1)单击“读数据”按钮，则把考生文件夹下in5．dat文件中的100个正整数读入数组A，并将它们显示在Text1文本框中。2)单击“排序”按钮，则首先将这100个数中的所有完全平方数放入数组B中，并将它们按降序排列显示在Text2文本框中。提示：一个整数若是另一个整数的平方，那么它就是完全平方数。如144=122，所以144就是一个完全平方数。要求：去掉注释符，把?改为正确内容，并添加代码使得“排序”命令按钮的Click事件过程可以实现上述功能。提示：Sort过程可以把求出的完全平方数进行排序，可以直接调用。注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须进行“排序”，且须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。

问答题(1)在考生文件夹下有一个工程文件sjt3．vbp，相应的窗体文件为sjt3．frm。在窗体上有一个名称为Command1、标题为“计算”的命令按钮；两个水平滚动条，名称分别为Hscroll1和Hscroll2，其Max属性均为100，Min属性均为1；四个标签，名称分别为Label1、Label2、Label3和Label4，标题分别为“运算数1”、“运算数2”、“运算结果”和空白；此外还有一个包含四个单选按钮的控件数组，名称为Option1，标题分别为“+”、“-”、“*”和“／”，如图3—129(a)所示。程序运行后，移动两个滚动条中的滚动框，用滚动条的当前值作为运算数，如果选中一个单选按钮，然后单击计算按钮，相应的计算结果将显示在：Label4中，程序运行情况如图3—129所示。这个程序不完整，请把它补充完整，并能正确运行。要求：去掉程序中的注释符，把程序中的?改为正确的内容，使其能正确运行，但不能修改程序中的其他部分，也不能修改控件的属性。最后用原来的文件名保存工程文件和窗体文件。(2)在考生文件夹下有一个工程文件sjt4．vbp，相应的窗体文件为sjt4．frm。在窗体上有一个命令按钮，其名称为Command1，标题为“输入／显示”；此外还有一个文本框，其名称为Text1，初始内容为空白。程序的功能是，程序运行后，单击命令按钮，显示输入对话框，在对话框中输入某个月份的数值(1～12)，然后单击“确定”按钮，即可在文本框中输出该月份所在的季节。例如输入5，将输出“5月份是夏季”，如图3—130所示。程序不完整，请补充完整。要求：去掉程序中的注释符，把程序中的“?”改为正确的内容，使其能正确运行，但不能修改程序中的其他部分。最后用原来的文件名保存工程文件和窗体文件。

问答题在考生文件夹下有一个数据库文件“samp2．accdb”，里面已经设计好了一个关联的表对象“tStud”、“tScore”、“tCourse”和一个空表“tTemp”，请按以下要求完成设计。(1)创建一个查询，查找并显示年龄在18～20岁之间(包括18岁和20岁)的学生的“姓名”、“性别”、“年龄”和“入校时间”，所建查询名为“qT1”。(2)创建一个查询，将所有学生设置为非党员，所建查询名为“qT2”。(3)创建一个交叉表查询，要求能够显示各门课程男女生不及格的人数，结果如图2．2所示，所建查询名为“qT3”。要求：直接用查询设计视图建立交叉表查询，小允许用其他查询做数据源。交叉表查询不做各行小计。(4)创建一个查询，将有不及格成绩的学生的“姓名”、“性别”、“课程名”和“成绩”等信息追加到“tTemp”表的对应字段中，并确保“tTemp”表中男生记录在前、女生记录在后，所建查询名为“qT4”；要求创建此查询后运行该查询，并查看运行结果。

问答题在考生文件夹下有一个数据库文件“samp2．accdb”，里面已经设计好两个表对象“tA”和“tB，请按以下要求完成设计。 (1)创建一个查询，查找井显示6月份入住客人的“姓名”、“房问号”、“电话”和“入住口期”4个字段的内容，将查询命名为“qT1”。 (2)创建一个查询，能够在客人结账时根据客人的姓名统计这个客人已住天数和应交金额，并显示“姓名”、“房间号”、“已住天数”和“应交金额”，将查询命名为“qT2”。 注：输入姓名时应提示“请输入姓名：” 已住天数按系统日期为客人结账日进行计算。 应交金额＝已住天数×价格。 (3)创建一个查询，查找“身份证”字段第4位～第6位值为“102”的记录，并显示“姓名”、“入住日期”和“价格”3个字段的内容，将查询命名为“qT3”。 (4)以表对象“tB”为数据源创建一个查询，使用“房间号”统计并显示每栋楼的各类房间个数。行标题为“楼号”，列标题为“房间类别”，所建查询命名为“qT4”。 注：房间号的前两位为楼号。

问答题(1)考生文件夹下的工程文件sjt3．vbp中有一个初始内容为空、且带有垂直滚动条的文本框，其名称为Text1；两个标题分别为“读数据”和“查找”的命令按钮，其名称分别为Cmd1、Cmd2。请画一个标题为“查找结果”的标签Labe11，再画一个名称为Text2，其初始内容为空的文本框，如图3—104所示。程序功能如下：①单击“读数据”按钮，则将考生文件夹下in3．dat文件中己按升序排列的30个整数读入一维数组a中，并同时显示在Text1文本框内；②单击“查找”按钮，将弹出输入框接收用户输入的任意一个偶数，若接收的数为奇数，则提示重新输入。如果接收的偶数超出一维数组a的数值范围，则无须进行相应查找工作，直接在Text2内给出结果；否则，在一维数组a中查找该数，并根据查找结果在Text2文本框内显示相应信息。命令按钮的Click事件过程己给出，但“查找”按钮的Click事件过程不完整，请将其中的注释符去掉，把“?”改为正确的内容，以实现上述程序功能。注意：考生不得修改窗体文件中已经存在的控件和程序，最后程序按原文件名存盘。(2)考生文件夹下的工程文件sjt4．vbp中有一个初始内容为空的文本框Text1，一个包含三个元素的文本框控件数组Text2，两个标题分别是“读数据”和“统计”的命令按钮，两个分别含有三个元素的标签控件数组Labe11和Labe12，如图3—105所示。程序功能如下：①考生文件夹下in4．dat文件中存有20个考生的考号及数学和语文单科考试成绩。单击“读数据”按钮，可以将in4．dat文件内容读入到20行3列的二维数组a中，并同时显示在Text1文本框内；②单击“统计”按钮，则对考生数学和语文的平均分在“优秀”、“通过”和“不通过”三个分数段的人数进行统计，并将人数统计结果显示在控件数组Text2中相应位置。其中，平均分在85分以上(含85分)为“优秀”，平均分在60～85分之间(含60分)为“通过”，平均分在60分以下为“不通过”。命令按钮的Click事件过程已经给出，但‘统计”按钮的Click事件过程不完整，请将其中的注释符去掉，把“?”改为正确的内容，以实现上述程序功能。注意：考生不得修改窗体文件中已经存在的控件和程序，最后程序按原文件名存盘。

问答题在名称为Form1，标题为“框架”的窗体上添加一个名称为Frame1，且标题为空的框架。框架内含有两个单选按钮，名称分别为Opt1和Opt2，其标题分别为“字体”、“大小”。注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt1.vbp，窗体文件名保存为sjt1.frm。

问答题注意：下面出现的“考生文件夹”均为c：/wexam/25160001。请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上建立一个名称为Cmd1，宽度为1500，高度为500，标题为“显示”的命令按钮，编写适当的事件过程，要求程序运行后，如果单击“显示”命令按钮，则在窗体上显示“计算机等级考试”，运行结果如图8-1所示。程序中不能使用任何变量，直接显示字符串。注意：保存时必须存放在考生文件夹下，窗体文件名为sjt1.frm，工程文件名为sjt1.vbp。(2)在名称为Form1的窗体上建立两个名称分别为Cmd1和Cmd2，标题分别为“必修课”和“选修课”的命令按钮。编写适当的事件过程，要求程序运行后，如果单击“必修课”命令按钮，在窗体上显示“VB6.0必修课”；如果单击“选修课”命令按钮，在窗体上显示“C语言选修课”。程序中不能使用任何变量，直接显示字符串。程序运行界面如图8-2所示。注意：保存时必须存放在考生文件夹下，窗体文件名为sjt2.frm，工程文件名为sjt2.vbp。

问答题(1)在考生文件夹下有一个工程文件sjt3．vbp。程序的功能是：在运行时，如果选中一个单选按钮和一个或两个复选框，并单击“确定”按钮，则对文本框中的文字做相应的设置，如图3—100所示。窗体上的控件已经画出，但没有给出主要程序内容，请编写适当的事件过程，完成上述功能。注意：不能修改已经给出的程序部分和已有的控件；在结束程序运行之前，必须选中一个单选按钮和至少一个复选框，并单击“确定”按钮；必须通过单击窗体右上角的关闭按钮结束程序，否则无成绩。最后把修改后的文件按原文件名存盘。(2)在考生文件夹下有一个工程文件sjt4．vbp。窗体中已经给出了所有控件。程序运行时，单击“读入文件”按钮，将显示一个“打开”对话框，可以在该对话框中选择考生文件夹下的文本文件in4．txt，并把该文件的内容显示到Text1文本框中。要求：请去掉程序中的注释符，并把程序中的?改为正确的内容，使其能正确运行，但不能修改程序中的其他部分和控件属性。最后用原来的文件名保存工程文件和窗体文件。

问答题在名为Form1的窗体上绘制一个标签(名称为Label1，标题为输入)、一个文本框(名称为Text1，Text属性为空白)和一个命令按钮(名称为Command1，标题为显示)。请编写命令按钮的Click事件过程，使程序运行后，在文本框中输入内容，然后单击命令按钮，则标签和文本框消失，并在窗体上显示文本框中的内容。运行后的窗体如下图左图和右图所示。注意：要求程序中不得使用任何变量，文件必须存放在考生文件夹中，工程文件名为sj2.vbp，窗体文件名为sj2.frm。

问答题(1)在考生目录下有一个上程文件sit3．vbp，窗体上有一个网和一条直线(直线的名称为Line1)构成一个钟表的图案；有两个命令按钮，名称分别为Command1、Command2，标题分别为“开始”、“停止”；还有一个名为Timerl的讣时器。程序运行时，钟表指针不动，单击“开始”按钮，则钟表上的指钊(即Line1)开始顺时针旋转(每秒转6°，一分钟转一圈)；单击“停止”按钮，则指针停止旋转。运行时的窗体如图2．80所示。请设置计时器的适当属性，使得每秒激活计时器的Timer事件一次，并编写两个按钮的Click事件过程。文件中已经给出了所有控件和部分程序，小得修改已有程序和其他控件的属性；编写的事什过程中小得使用变量，且只能写一条语句。最后把修改后的文件按原文件名存盘。(2)在考生文件夹有一个工程文件sit4．vbp，窗体上有两个文本框、三个单选按钮和一个命令按钮。运行时，存Text1中输入若干个大写和小写字母，并选中一个单选按钮，冉单击“转换”按饥，则按选中的单选按钮的标题进行转换，结果放入Text2(如图2．81所示)。在给出的窗体文件中已经给山了全部控件，但程序不完整，要求：上掉程序中的注释符，把程序中的?改为正确的内容。注意：不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。

问答题在考生文件夹下有一个工程文件sjt5．vbp，含三个窗体，标题分别为“启动”、“注册”、“登录”，程序运行时显示“肩动”窗体，单击窗体上按钮时弹出对应窗体进行注册或登录。 注册信息放在全局数组users中，注册用户数(小丁或等于10个)放存全局变量n中(均已在标准模块中定文)。 注册时用户名不能重复，且“口令”与“验证口令”必须相同，注册成功则在“启动”窗体的标签中提示“注册成功”，否则提示相应错误信息。登录时，检验用户名和口令，若正确，则在“启动”窗体的标签上提示“登录成功”，否则提示相应错误信息。 标准模块中函数finduser的功能是：存users数组中搜索用户名(参数ch)，找到则返回该用户名在users中的位置，否则返回0。 文件中已经给出了所有控件和程序，但程序小完整，请去掉程序中的注释符，把Form2、Form3窗体文件中的?改为正确的内容。 注意：不得修改已经存在的程序和控件的属性；最后，程序按原文件名存盘。

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

问答题要求：去掉程序中的注释符，把程序中的?改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。

问答题在名称为Form1的窗体上添加一个名称为Shape1的形状控件，要求在属性窗口中将其形状设置为椭圆，其短轴(垂直方向)、长轴(水平方向)的长度分别为800、1600。把窗体的标题改为“Shape控件”，窗体上无最大化、最小化按钮。程序运行后的窗体如图所示。注意：存盘时必须存放在下，工程文件名保存为sjt1.vbp，窗体文件名保存为sjt1.frm。

问答题存考生文件夹下有一个工程文件sjt4.vbp(相应的窗体文件名为sjt4.frm)，其功能是通过调用过程FindMin求数组的最小值。程序运行后，在4个文本框中各输入一个整数，然后单击命令按钮，即可求出数组的最小值，并在窗体上显示出来(如图所示)。要求：去掉程序中的注释符，把程序中的?改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。