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

admin2019-05-14 38

问题考生文件夹下有工程文件sjt5．vbp。程序运行时，外观如图3-187所示，单击“显示数据”按钮，则将考生文件夹下in5．dat文件的内容读入到5行40列的二维数组a中，并按5行显示在Text1文本框内；单击“统计”按钮，则计算每行中小于50的数之和，及这些数的平均值(平均值保留2位小数，是否四舍五入不限)，并将它们(共10个值)分别显示在Label1数组及Text2数组中。单击“保存”按钮，则保存计算结果。“显示数据”和“保存”按钮的Click事件过程已经给出，请编写“统计”按钮的Click事件过程实现上述功能。

注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须用“统计”进行统计，且必须单击“保存”按钮保存结果，否则无成绩。最后，程序按原文件名存盘。

选项

答案审题分析本题可利用一个嵌套的For循环来完成计算工作：在外循环(循环变量的取值为1～5)体中，先初始设置记录每行小于50的数据之和的变量Sum和记录每行小于50的数据个数的变量Counter的初值为0，接着通过内循环(循环变量的取值为1～40)体完成对每行数据的累加工作，如果a(i，j)小于50则将其累加到Sum中同时令Counter+1。内循环结束后，用表达式Avg=Sum／Counter计算出平均值并分别将Sum和Avg显示在控件数组中。操作步骤步骤1：打开考生文件夹中的本题工程文件sjt5．vbp，打开代码编辑窗口，在指定位置编写以下代码：参考代码： For i=1 To 5 Sum=0 Counter=0 For j=1 To 40 If a(i，j)＜50 Then sum=sum+a(i，j) Counter=Counter+1 End If Next AVg=Sum／Counter Label1(i-1)．Caption=Sum Text2(i-1)．Text=Int(Avg*100)／100 Next 步骤2：按键运行程序，先单击“显示数据”按钮，接着单击“统计”按钮，然后单击“保存”按钮保存结果。步骤3：按要求将文件保存至考生文件夹中。考点链接多重循环、控件数组、数组定义与操作。

解析

转载请注明原文地址:https://kaotiyun.com/show/vUUp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类