首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下的工程文件sjt5.vbp中有一个初始文本为空的文本框Text1,两个标题分别是“读数据”和“计算”的命令按钮;请添加一个标题为“各行平均数的最大值”的标签Label2,再添加一个初始文本为空的文本框Text2,如图所示。 程序功能如下:
考生文件夹下的工程文件sjt5.vbp中有一个初始文本为空的文本框Text1,两个标题分别是“读数据”和“计算”的命令按钮;请添加一个标题为“各行平均数的最大值”的标签Label2,再添加一个初始文本为空的文本框Text2,如图所示。 程序功能如下:
admin
2015-06-30
61
问题
考生文件夹下的工程文件sjt5.vbp中有一个初始文本为空的文本框Text1,两个标题分别是“读数据”和“计算”的命令按钮;请添加一个标题为“各行平均数的最大值”的标签Label2,再添加一个初始文本为空的文本框Text2,如图所示。
程序功能如下:
①单击“读数据”按钮,则将考生文件夹下in5.dat文件的内容读入20行5列的二维数组a中,并同时在Text1文本框内显示。
②单击“计算”按钮,则自动统计二维数组a中各行的平均数,并将这些平均数中的最大值显示在Text2文本框内。
“读数据”按钮的Click事件过程已经给出,请编写“计算”按钮的Click事件过程实现上述功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须进行“计算”,且必须用窗体右上角的关闭按钮结束程序,否则将没有成绩。最后,程序按原文件名进行存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件,添加一个标题"各行平均数的最大值"的标签Label1,再添加一个初始内容为空的文本框Text2。 步骤2:分析并编写程序代码。 程序提供代码 Option Base 1 Dim a(20, 5) As Integer Private Sub Command1_Click() Open App.Path & "\in5.dat" For Input As #1 For i = 1 To 20 For j = 1 To 5 Input #1, a(i, j) Text1 = Text1 + Str(a(i, j)) + Space(2) Next j Text1 = Text1 + Chr(13) + Chr(10) Next i Close #1 End Sub Private Sub Command2_Click() ’考生编写 End Sub Private Sub Form_Unload(Cancel As Integer) Open App.Path & "\out5.dat" For Output As #1 Print #1, Text2.Text Close #1 End Sub 程序结束 参考答案 Private Sub Command2_Click() Dim sum As Long Dim max As Long Dim b(20) As Integer For i = 1 To 20 sum = 0 For j = 1 To 5 sum = a(i, j) + sum Next j b(i) = sum / 5 Next i max = b(1) For i = 1 To 20 If b(i) > max Then max = b(i) Next Text2 = max End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/lyQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若要设置定时器控件的定时时间,需设置的属性是
使用通用对话框控件时,要在打开的对话框的标题栏上显示“保存文件”,应把这4个汉字赋给的属性变量是
目录列表框的Path属性的作用是
下述关于数据库系统的叙述中正确的是______。
在最坏情况下,冒泡排序的时间复杂度为【】。
若结点的存储地址与其关键字之间存在某种映射关系,则称这种存储结构为______。
将C盘根目录下的图形文件moon.jpg装入图片框Picture1的语句是______。
Jackson结构化程序设计方法是英国的M.Jackson提出的,它是一种面向【】的设计方法;
某二叉树中度为2的结点有18个,则该二叉树中有______个叶子结点。
一个项目具有一个项目主管,一个项目主管可管理多个项目,则实体“项目主管”与实体“项目”的联系属于【】的联系。
随机试题
在WindowsXP操作系统下,计算器可以在开始菜单上的程序列表中的()子菜单中打开。
重申社会准则的功能
成本加酬金合同的结果能够可靠地估计,应同时具备的条件为()。
项目经理在审计报告日后,准备将审计工作底稿归档,下列做法中,正确的有()。
道教的最高神是()。
启蒙运动是17、18世纪发生在欧洲的一场反封建、反教会的资产阶级思想文化解放运动,是继文艺复兴运动之后欧洲近代()思想解放运动。
从平面a外一点P引与a相交的直线,使得P点与交点的距离等于1,则满足条件的直线条数一定不可能是( )。
刑事案件中的陪审团不会依据任何证人所做的未经证实的证词而做出决定,这是十分正确的,因为对任何人所做的未经证实的指控保留高度怀疑是比较明智的。但为了一致,陪审团应该结束那种通行的做法,即依据未经完全证实的招供而给被告定罪。下面哪项,如果正确,最能增强
在特权模式下,输入()命令,就可以进入全局配置模式。
A、小学六年级B、初中一年级C、初中二年级D、高中二年级C第二段的后半部分提到“当国内读初二的时候,美国是小学八年级”,所以选择C。
最新回复
(
0
)