考生文件夹下有工程文件sjt5.vbp。程序运行时,外观如图3.187所示,单击“显示数据”按钮,则将考生文件夹下in5.dat文件的内容读入到5行40列的二维数组a中,并按5行显示在Textl文本框内;单击“统计"按钮,则计算每行中小于50的数之和,及这

admin2016-03-22  33

问题 考生文件夹下有工程文件sjt5.vbp。程序运行时,外观如图3.187所示,单击“显示数据”按钮,则将考生文件夹下in5.dat文件的内容读入到5行40列的二维数组a中,并按5行显示在Textl文本框内;单击“统计"按钮,则计算每行中小于50的数之和,及这些数的平均值(平均值保留2位小数,是否四舍五入不限),并将它们(共10个值)分别显示在Labell数组及Text2数组中。单击“保存”按钮,则保存计算结果。“显示数据”和“保存”按钮的Click事件过程已经给出,请编写“统计”按钮的Click事件过程实现上述功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须用“统计”进行统计,且必须单击“保存”按钮保存结果,否则无成绩。最后,程序按原文件名存盘。

选项

答案【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,打开代码编辑窗口,在指定位置编写以下代码: 参考代码: For i=1 To 5 Sum=0 Counter=0 For j=1 To 4 0 If a(i,j)<50 Then Sum=Sum+a(i,j) Counter=Counter+1 End If Next Avg=Sum/Counter Labell(i一1).Caption=Sum Text2(i一1).Text=Int(Avg*i00)/100 Next 步骤2:按键运行程序,先单击“显示数据”按钮,接着单击“统计”按钮,然后单击“保存”按钮保存结果。 步骤3:按要求将文件保存至考生文件夹中。

解析
转载请注明原文地址:https://kaotiyun.com/show/KMLp777K
0

最新回复(0)