首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp,其功能是:找出矩阵元素的最大值,并求出矩阵对角线元素之和,窗体外观如图所示。程序运行时,矩阵数据被放入二维数组a中。当单击“找矩阵元素最大值”命令按钿时,找出矩阵中最大的数,并在标签Label3中显示。当单击“
在考生文件夹中有一个工程文件sjt5.vbp,其功能是:找出矩阵元素的最大值,并求出矩阵对角线元素之和,窗体外观如图所示。程序运行时,矩阵数据被放入二维数组a中。当单击“找矩阵元素最大值”命令按钿时,找出矩阵中最大的数,并在标签Label3中显示。当单击“
admin
2018-12-20
44
问题
在考生文件夹中有一个工程文件sjt5.vbp,其功能是:找出矩阵元素的最大值,并求出矩阵对角线元素之和,窗体外观如图所示。程序运行时,矩阵数据被放入二维数组a中。当单击“找矩阵元素最大值”命令按钿时,找出矩阵中最大的数,并在标签Label3中显示。当单击“对角线元素之和”命令按钮时,计算矩阵主对角线元素之和,并在标签Label4中显示。文件中已给出部分程序,请编写“找矩阵元素最大值”及“对角线元素之和”两个命令按钮的事件过程中的部分程序代码。
注意:不得修改程序的其他部分和控件属性。最后将修改后的文件按原文件名存盘。程序调试通过后。两个命令按钮的事件过程必须至少各执行一次。
选项
答案
步骤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#1 For i=1 To 4 For j=1 To 4 Input#1,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 If Next j Next i LabeB=max save Label3 End Sub Private Sub Command2_Click() Dim sum As Integer sum=0 For i=1 To 4 For j=1 To 4 If i=j Then sum=sum+a(i,j) End If Next j Next i Label4=sum save Label4 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
在本题中,文件以Input方式打开,使用一个4行、4列的二维数组a来存放数据,并在一个嵌套的For循环中显示矩阵。
转载请注明原文地址:https://kaotiyun.com/show/LyFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面关于直线控件的叙述中正确的是
窗体上有一个名称为Text1的文本框,一个名称为CD1的通用对话框,一个标题为"打开文件"的命令按钮,如图所示。命令按钮的单击事件过程如下:PrivateSubCommand1_Click() CD1.ShowOpen OpenCD1.
下面哪个属性肯定不是框架控件的属性( )。
为了对多个控件执行操作,必须选中这些控件。下列不能选中多个控件的操作是( )。
以下程序的功能是随机产生10个两位的整数:OptionBase1PrivateSubCommand1_Click() Dima(10)AsInteger DimiAsInteger Randomize Fori=1
窗体上有1个名称为Text1的文本框,1个名称为Label1的标签。程序运行后,如果在文本框中输入信息,则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程为( )。
为使文本框具有初始值"VB",在设计阶段正确的操作是
VB应用程序不能把一个二维表格中的数据存入文件
已知:x=-6y=39则表达式"y\x*Sgn(x)"的值为( )。
在用Open语句打开文件时,如果省略“For方式”,则打开的文件的存取方式是()。
随机试题
医疗机构违反规定,涂改、伪造、隐匿、销毁病历资料的,对直接责任人员应( )医疗机构违反规定,涂改、伪造、隐匿、销毁病历资料、情节严重的,对直接责任人员应( )
定传动比圆柱形平摩擦轮传动中,其小轮是用()制造的。
Igotcaughtintherainandmysuit______.
某上市公司拟投资新建一个生产项目,委托甲咨询公司开展可行性研究,通过比较A、B两个厂址方案的建设条件、建设投资和运营费用,甲咨询公司推荐了B方案。B方案总建设占用用地面积为100000m2,总建筑面积为150000m2,建(构)筑物及堆场总占地面积为300
对某商场地下车库的机械排烟系统进行验收时,选择一个防火分区的一只感温探测器和一只手动报警装置进行模拟火灾试验,然后观察排烟阀和排烟风机的动作情况,并使用风速仪测试相应排烟口处的风速。下列现场情况及排烟口处的风速测试结果中,符合验收要求的是()。
“备案号”栏应填()。“成交方式”栏应填()。
一般情况下。优先股的股息率是()的,其持有者的股东权利受到一定限制。
下列脑颅骨中,成对的是()。
以下ARM指令中源操作数属于寄存器间接寻址的指令是()。
TheHydrogenEconomyItseemsthateverydaythereisanewannouncementinthenewsaboutautomobilespoweredbyfuelcells
最新回复
(
0
)