首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下的工程文件sjt5.vbp中有一个初始为空的文本框Text1,两个标题分别是“读数据”和“计算”的命令按钮;请添加一个标题为“各行最小数的平均值为”的标签Lahel2,再添加一个初始为空的文本框Text2,如图所示。 程序功能如下: ①
考生文件夹下的工程文件sjt5.vbp中有一个初始为空的文本框Text1,两个标题分别是“读数据”和“计算”的命令按钮;请添加一个标题为“各行最小数的平均值为”的标签Lahel2,再添加一个初始为空的文本框Text2,如图所示。 程序功能如下: ①
admin
2020-06-30
30
问题
考生文件夹下的工程文件sjt5.vbp中有一个初始为空的文本框Text1,两个标题分别是“读数据”和“计算”的命令按钮;请添加一个标题为“各行最小数的平均值为”的标签Lahel2,再添加一个初始为空的文本框Text2,如图所示。
程序功能如下:
①单击“读数据”按钮,则将考生文件夹下in5.dat文件的内容读入20行5列的二维数组a中,同时在Text1文本框内显示。
②单击“计算”按钮,程序则自动统计二维数组中各行的最小数,并将这些最小数的平均值显示在Text2文本框内。
“读数据”按钮的Click事件过程已经给出,请编写“计算”按钮的Click事件过程实现上述的功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须进行“计算”,且必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名进行存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件,添加一个标题为"各行最小数的平均值为"的标签Label2,再添加一个初始内容为空的文本框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 min As Long Dim b(20) As Integer For i = 1 To 20 min = a(i, 1) For j = 1 To 5 If a(i, j) < min Then min = a(i, j) End If Next j b(i) = min Next i sum = 0 For i = 1 To 20 sum = sum + b(i) Next Text2 = sum / 20 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/unHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如图5所示,在列表框Listl中已经有若干人的简单信息,运行时在Textl文本框(即”查找对象”右边的文本框)中输入一个姓或姓名,单击”查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹
下面不是键盘事件的是( )。
为计算an的值,某人编写了函数power如下:PrivateFunctionpower(aAsInteger,nAsInteger)AsLong DimsAsLong p=a Fork=1Ton p=p*a Next
在学校中,“班级”与“学生”两个实体集之间的联系属于()关系。
有如下程序:PrivateSubForm_Click()DimsAsInteger,pAsIntegerp=1Fori=1To4 Forj=1Tois=s+j Nextj p=p*sNextiP
下列过程定义语句中,形参数量可变的是()。
一间宿舍可住多个学生,则实体宿舍和学生之间的联系是( )。
下列有关通用对话框控件的说法中,正确的是
设有课程关系模式如下:R(C#,Cn,T,Ta)(其中c#为课程号,Cn为课程名,T为教师名,Ta为教师地址)并且假定不同课程号可以有相同的课程名,每个课程号下只有一位任课教师,但每位教师可以有多门课程。该关系模式可进一步规范化为()。
随机试题
卫生服务研究侧重于研究卫生服务需要、卫生服务供给和_______三者之间的关系。
修改Excel工作表名的操作可以通过()工作表标签实现。
下列属于资本市场的有()。
企业“应收账款”科目月末借方余额60000元,其中:“应收账款——甲公司”明细科目借方余额100(00元,“应收账款——乙公司”明细科目贷方余额40000元;“预收账款”科目月末贷方余额80000元,其中:“预收账款——A公司”明细科目贷方余额100000
小包价旅游的可选择部分不包括()。
社会主义核心价值体系是建设和谐文化的根本,它的基本内容包括()
地壳中,硅镁层的成分相当于()。
《中华人民共和国教育法》规定,明知校舍或者教育教学设施有危险,而不采取措施,造成人员伤亡或者重大财产损失的,对直接负责的主管人员和其他直接责任人员,依法追究()
根据下面资料,回答下面5个小题。2011年7月份以来,受部分地区工业用电需求增长过快、部分地区持续高温干旱等影响,我国火力发电、电煤消耗屡创新高。从消耗看,7月份,全国日发电量六次突破历史新高,全国重点电厂日均耗煤401万吨,同比增加7
影视构图的表现主要为()。
最新回复
(
0
)