2012年计算机二级VB上机试题及解题思路第38套

　　3. 综合应用(1小题，计30分)

　　注意：下面出现的“考生文件夹”均为%USER%

　　在考生文件夹下有一个工程文件sjt5.vbp，界面如图所示，其功能如下：

　　1)单击“读数据”按钮，则把考生文件夹下文件in5.dat中的12组整数(其中每组含有10个数，共计120个整数)读到数组a 中;

　　2)单击“计算”按钮，则对每组数求平均值，并将所求各组数的平均值截尾取整后存入s 数组中;

　　3)单击“显示”按钮，则将所求各组数的平均值显示在文本框Text1中;

　　4)单击“存盘”按钮则把计算结果存盘。

　　在给出的窗体文件中已经有了全部控件，且“读数据”、“显示”和“存盘”按钮的Click事件过程已经给出，请为“计算”按钮编写适当的事件过 程以实现上述功能。

　　注意：

　　不得修改已经存在的程序，在结束程序运行之前，必须用“存盘”按钮存储计算结果，否则无成绩。最后，程序按原文件名存盘。

　　解题思路：

　　启动Visual Basic系统，打开考生文件夹下需编辑的工程文件sjt5.vbp，相应的窗体文件名为sjt5.frm。

　　由于所提供的窗体程序不完整，需添加事件过程。

　　单击“计算”按钮(即运行Click事件过程)，在该Click事件过程中加入语句：

　　Private Sub Command2_Click()

　　’考生编写

　　For i = 1 To 12

　　Sum = a(i, 1)

　　For j = 2 To 10

　　Sum = Sum + a(i, j)

　　Next j

　　s(i) = Int(Sum / 10)

　　Next i

　　End Sub

　　参考文件：c:\wexam\26990001\hlpsys\参考答案\sjt5.vbp、sjt5.frm、sjt5.vbw、out5.dat

　　请把这些文件复制到c:\wexam\26990001中，然后打开sjt5.vbp文件并运行。

　　相关推荐：

　　2012年计算机等考四级数据库工程师备考笔记汇总

　　2012年计算机等级考试二级VB重点知识汇总

　　2012年下半年计算机等级考试报名时间及入口汇总