首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中I有一个工程文件sjt5.Vbp,其功能是:找出矩阵元素的最大值,并求出矩阵对角线元索之和,窗体外观如图所示。程序运行时,矩阵数据被放入二维数组a中。当单击“找矩阵元素最大值”命令按钮时,找出矩阵中最大的数,并在标签Labe13中显示。当单击
在考生文件夹中I有一个工程文件sjt5.Vbp,其功能是:找出矩阵元素的最大值,并求出矩阵对角线元索之和,窗体外观如图所示。程序运行时,矩阵数据被放入二维数组a中。当单击“找矩阵元素最大值”命令按钮时,找出矩阵中最大的数,并在标签Labe13中显示。当单击
admin
2018-12-20
65
问题
在考生文件夹中I有一个工程文件sjt5.Vbp,其功能是:找出矩阵元素的最大值,并求出矩阵对角线元索之和,窗体外观如图所示。程序运行时,矩阵数据被放入二维数组a中。当单击“找矩阵元素最大值”命令按钮时,找出矩阵中最大的数,并在标签Labe13中显示。当单击“对角线元素之和”命令按钮时,计算矩阵主对角线元素之和,并在标签Label4中显示,文件中已给出部分程序,请编写“找矩阵元素最大值”及“对角线元索之和”两个命令按钮的事件过程中的部分程序代码。
注意:不得修改程序的其他部分和控件属性。最后将修改后的文件按原文件名存盘。程序调试通过后,两个命令按钮的事件过程必须至少各执行一次。
选项
答案
在本题中,文件以Input方式打开,使用一个4行、4列的二维数组a来存放数据,并在一个嵌套的For循环中显示矩阵。 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Option Base 1 Dim a(4,4)As Integer Private Sub Commandl_Click() ‘====考生编写程序开始==== ‘===考生编写程序结束:=== ‘不得修改以下部分 save Label3 End Sub Private Sub Command2_Click() ‘====考生编写程序"始==== ‘====考生编写程序结束:=== ‘不得修改以下部分 save Label4 End Sub Private Sub Form_Load() Open App.Path&”\in5.txt”For Input As#l For i=1 To 4 Forj=1 To 4 Input#I,a(i,j) Next j Next i Close#1 End Sub 程序结束 Private Sub Commandl_Click() Dim max As Integer max=0 For i=1 To 4 For j=1 To 4 If a(i,j)>max Then max=a(i,j) End lf Next j Next i Label3=max save Label3 End Sub Private Sub Command2_Click() Dim sum As Integer sum=0 For i=1 To 4 For j=l To 4 Ifi_j Then sum=sum+a(i,j) End If Next j Next i Label4=sum save Label4 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/zVFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下语句序列:Dima,bAsIntegerPrintaPrintb执行以上语句序列,下列叙述中错误的是( )。
设a=2,b=3,c=4,d=5,下列表达式的值是( )。
窗体上有一个名称为CD1的通用对话框,一个名称为Text1的文本框,窗体的单击事件过程如下:PrivateSubForm_Click()CD1.DialogTitle="改变颜色"CD1.Color=
窗体上有一个名称为Text1的文本框,一个名称为Combo1的组合框。将文本框中的内容添加到组合框中所使用的命令是
设有如下声明语句OptionBase1Dimarr(2,-1To5)AsInteger则数组arr中数组元素的个数是
编写如下程序:PrivateSubCommand1_Click()Fori=1To4PrintSpace(12-3*i);Forj=1ToiPrintj;
窗体上有一个名称为VScroll1的垂直滚动条,为了设定单击滚动条两端箭头时的Value增量值,应设置的属性是
窗体上已有的3个单选按钮组成了1个名为ChkOpt1的控件数组。用于区分控件数组ChkOpt1中每个元素的属性是( )。
随机试题
在劳动资料方面,最能标志生产力发展水平的因素是()
A.口腔B.胃C.空肠D.回肠胆盐的吸收部位
某锅炉操作工人,在一个通风不良条件下,连续工作3~4小时,突然感到头痛,头晕等症状。患者面色潮红,口唇呈樱桃红色。可疑毒物中毒是
某县计量局在对辖区内的加油站进行计量检查时,发现某加油站的加油机存在加油数量短缺现象,遂决定给予罚款2000元的行政处罚。本案可以适用的程序有:( )
不是工程间接费的构成费用是()。
将总体共120个单元随机分为10路纵队(共12排),然后任取其中一排,得到12个样本单元,此抽样方法属于()。
________班会的形式包括:主题报告会、主题汇报会、主题讨论会、科技小制作成果展评会、主题竞赛、主题晚会等。
更改当前数据透视表的数据源为“A8:E9”。
Besidesactiveforeignenterprisesanda【C1】______numberofprivateemployers,aconsequentialnewdevelopmentwasthedevelopme
Ifyoudidn’tknowanybetter,youmightthinkthatStar,Snuppy,CCandANDiwerejustabunchofinterestingnames.You’donly
最新回复
(
0
)