在考生目录下已有一个工程文件sjt5.vbp。运行程序后,分别从两个文件中读出数据,放入两个一维数组a、b中。请编写:程序,当单击“合并数组”按钮时,将a、b数组中相同下标的数组元素的值求和,并将结果存入数组C。单击“找最大值”按钮时,凋用find过程分别找出a、C数且中元素的最大值,并将所找到的结果分别显示在Text1、Text2中。在给出的窗体文件中已经有了全部控件,但程序不完整。 要求:去掉程序中的注释符,把程序中的?改为正确的内容,并编写相应程序,实现程序的功能。 注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调用通过后,各命令按钮的事件过程必须至少各执行一次。
第1题:
在考生文件夹中有一个工程文件sjt5.vbp,如图6所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计算结果显示在标签lblSecond中。 已给出了部分程序,请编写“计算”命令按钮事件过程中的部分程序代码,以便完成上述功能。 注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后,必须执行程序,并用“计算”按钮进行计算,否则无成绩。
第2题:
在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有一个名称为Text1的文本框数组,下标从0开始。程序运行时,单击“产生随机数”按钮,就会产生10个3位数的随机数,并放入Text1 数组中,如图6(a)所示单击“重排数据”按钮,将把Text1中的奇数移到前面,偶数移到后面,如图6(b)所示。文件中已经给出了所有控件和部分程序。 要求:请去掉程序中的注释符,把程序中的?改为正确的内容,使其能正确运行,不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 提示:在“重排数据”按钮的事件过程中有对其算法的文字描述,请仔细阅读。
第3题:
考生文件夹下有一个工程文件sit5.vbp。运行程序后,从文件中读出数据,将其放入一个5×5的二维数组a中。请编写程序,找出数组a中每行的最大值及该值在行中的次序(列下标),并将所找到的结果分别保存到一维数组b、c中(a中第一行的最大值保存在b(i)中,最大值的列次序保存在e(1)中)。
注意:不能修改程序的其他部分和控件属性,最后将修改后的文件按原文件名存盘。程序调试通过后,命令按钮的事件过程必须至少执行一次。
【考点分析】本题考点有:二维数组、嵌套循环、文件编辑、For循环语句以及If判断语句。
【解题思路】从考生文件夹下的文件中读出数据,放入5×5的二维数组a中。在命令按钮单击事件过程中,程序中变量Max保存最大数,最初把数组的第一个元素赋给Max,然后将其后的元素依次与之比较,如果大于Max的值则与之交换,依次类推,最终Max中的元素就是最大值,并把每一行的最大值保存到一维数组b中,通过For循环语句和If判断语句找出a数组中每行的最大值以及其在行中的位置,并将所找到的结果分别保存到一维数组c中,把最终的结果保存在文件out5.txt中。
【操作步骤】
步骤1:打开本题工程文件。
步骤2:打开代码编辑窗口,在指定位置编写如下代码。
参考答案
步骤3:调试并运行程序,关闭程序后按题目要求存盘。
第4题:
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个标题分别是“读数据”和“统计”的命令按钮,一个名称为Textl的文本框,两个标签控件,如图所示。
程序功能如下:
①单击“读数据”按钮,则将考生文件夹下in5.dat文件的内容(该文件中含有不超过800个英文单词,单词之问用1个空格隔开)显示在Textl文本框中;
②单击“统计”按钮,则自动统计Textl中所有5字母单词的个数,并显示在右下角的Labell标签中。“读数据”按钮的Click事件过程已经给出,“统计”按钮的Click事件过程不完整,函数GetWords的功能是从字符串s中分离出每个单词,依次放入数组words的数组元素中,返回值为单词的总数目。
要求:请将程序中的注释符去掉,把?改为正确的内容;补全“统计”按钮Click事件过程中的代码,以实现上述程序功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须进行“统计”,且必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名存盘。
第5题:
在名为Form1的窗体上建立一个名为Text1的文本框,将MuRiLine属性设置为True,ScrollBars属性设置为2。再建立两个名称分别为Cmd1、Cmd2和Cmd3命令按钮,标题分别为“读数”、“排序”和“保存”,如下图所示。
程序运行后,如果单击“读数”按钮,则读入in17.txt文件中的100个整数,放入一个数组中(数组下界为1);如果单击“排序”按钮,则对100个整数按从大到小进行排序;如果单击“保存”按钮,把排序后的全部数据在文本框Text1中显示出来,然后存入考生文件夹中的文件out17.txt中(在考生的目录下有标准模块mode1.bas过程可以把指定个数的数组元素存入out17.txt文件,考生可以把该模块文件添加到自己的工程中)。
注意:
文件必须存放在考生文件夹中,窗体文件名为execise17.frm,工程文件名execise17.vbp,排序结果存入out17.txt,否则没有成绩。