应用题
5.在考生文件夹下有一个工程文件sjt5．vbp，按照要求完成以下操作：
在名称为Forml的窗体上添加两个命令按钮，其名称分别为Cl和C2，标题分别为“读入数据”和“计算”(如图所示)。程序运行后，如果单击“读入数据”按钮，则调用题目所提供的ReadDatal和ReadData2过程读入datainl．txl和datain2．txt文件中的各20个整数，分别放入Arrl和Arr2两个数组中；如果单击“计算”按钮，则把两个数组中对应下标的元素相减，其结果放入第三个数组中(第1个数组的第n个元素减去第2个数组的第n个元素，其结果作为第3个数组的第n个元素。这里的n为1、2…20)，最后计算第3个数组各元素之和，把所求得的和在窗体上显示出来；并调用题目中给出的Write．Data过程将所求得的和存入考生文件夹下的dataout．txt文件中。
注意：考生不得修改窗体文件中已经存在的程序，且必须执行一次，最后将修改后的文件以原来的文件名存盘。
在名称为Forml的窗体上添加两个命令按钮，其名称分别为Cl和C2，标题分别为“读入数据”和“计算”(如图所示)。程序运行后，如果单击“读入数据”按钮，则调用题目所提供的ReadDatal和ReadData2过程读入datainl．txl和datain2．txt文件中的各20个整数，分别放入Arrl和Arr2两个数组中；如果单击“计算”按钮，则把两个数组中对应下标的元素相减，其结果放入第三个数组中(第1个数组的第n个元素减去第2个数组的第n个元素，其结果作为第3个数组的第n个元素。这里的n为1、2…20)，最后计算第3个数组各元素之和，把所求得的和在窗体上显示出来；并调用题目中给出的Write．Data过程将所求得的和存入考生文件夹下的dataout．txt文件中。
注意：考生不得修改窗体文件中已经存在的程序，且必须执行一次，最后将修改后的文件以原来的文件名存盘。
【正确答案】【操作步骤】
步骤l：打开本题工程文件，按照题目要求建立命令按钮控件并设置命令按钮的相应属性，程序中用到的控件及属性见表4．23。
步骤l：打开本题工程文件，按照题目要求建立命令按钮控件并设置命令按钮的相应属性，程序中用到的控件及属性见表4．23。
【答案解析】本题源程序已给出读文件中的数据和向文件中写数据的三个过程，只需适时调用它们，即在“读入数据”和保存过程中调用；要把数组Arrl和Arr2中对应下标的元素相减并把结果存入第3个数组中，需利用For循环逐一取出Arrl和Arr2对应元素；由于数组Arrl、Arr2及存储第3个数组和的变量要跨过程使用，因此需定义成窗体级变量；调用过程WriteData时需传递两个参数，分别是存入数据的文件名和存储第3个数组和的变量；语句OptionBase 1用于限定数组下标的下限，默认为l。