考生文件夹下的工程文件sjt5．vbp中有一个初始内容为空的文本框Text1，两个标题分别是“读数据”和“计算”的命令按钮；请画一个标题为“各行平均数的最大值为”的标签Label2，再画一个初始内容为空的文本框Text2，如图3—106所示。程序功能：

admin2019-05-14 20

问题考生文件夹下的工程文件sjt5．vbp中有一个初始内容为空的文本框Text1，两个标题分别是“读数据”和“计算”的命令按钮；请画一个标题为“各行平均数的最大值为”的标签Label2，再画一个初始内容为空的文本框Text2，如图3—106所示。
程序功能：
①单击“读数据”按钮，则将考生文件夹下in5．dat文件的内容读入20行5列的二维数组a中，并同时显示在Text1文本框内；
②单击“计算”按钮，则自动统计二维数组a中各行的平均数，并将这些平均数中的最大值显示在Text2文本框内。
“读数据”按钮的Click事件过程已经给出，请编写“计算”按钮的Click事件过程实现上述功能。注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须用“计算”按钮进行计算，且必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。

选项

答案步骤1：打开考生文件夹中的本题工程文件 sjt5．vbp，在窗体Form1中画一个标签和一个文本框，其属性及值如表4—64所示。 [*] 步骤2：打开代码编辑窗口，在指定位置编写以下代码。参考代码： For i=1To20 Sum=0 For j=1To5 Sum=Sum+a(i，j) Next Avg=Sum／5 If i=1Then Max=Avg ElseIf Max＜Avg Then Max=Avg End If Next 步骤3：按＜F5＞键运行程序，先单击“读数据”按钮，接着单击“计算”按钮，然后单击窗体右上角的关闭按钮结束程序。步骤4：按要求将文件保存至考生文件夹中。

解析本题可利用一个嵌套的For循环来完成计算工作：在外循环(循环变最的取值为1～20)体中，先初始设置记录每行数据之和的变量Sum的初值为0，接着通过内循环(循环变量的取值为1～5)体完成对每行数据的累加工作。内循环结束后，用表达式Avg=Sum／5计算出该行的平均值。如果是第一次执行外循环的循环体，则将当前Avg的值记录在变量Max中，否则仅在其他行Avg值大于Max的值时，才将其记录在变量Max中。嵌套For循环结束时，变量Max的值即为每行平均数中的最大值，将其显示在文本框Text2中。

转载请注明原文地址:https://jikaoti.com/ti/gxN0FFFM

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

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

二级VB

NCRE全国计算机二级

设a=2，b=3，c=4，d--5，下列表达式的值是()。3>2*bOra=cAndbcOrb◇a+c

上纵隔增宽伴有胸腔积液患儿，首先考虑

学校心理辅导的内容包括（）

男，40岁，左颞部棒击伤5小时，伤后昏迷20分钟，1小时前再次昏迷，左瞳孔散大，右侧偏瘫，病理征阳性，最可能的诊断是

股票市场的功能包括()。

人力资本投资分析的现代奠基人是()。

下列关于合营安排的表述中，正确的是()。

歌剧《弄臣》的曲作者是()。

请根据小学语文人教版三年级上册的课文《爬天都峰》，设计两道关于课文内容理解的练习题。

MylittlebrotherhasneverbeentoBeijing,butit’stheplace______.