2012年计算机二级VB上机试题及解题思路第46套

　　3. 综合应用(1小题，计30分)

　　注意：下面出现的“考生文件夹”均为%USER%

　　在考生文件夹中有一个工程文件sjt5.vbp，其功能是：找出矩阵元素的最大值，并求出矩阵对角线元素之和，窗体外观如图所示。程序运行时，矩阵数据被放入二维数组a 中。当单击“找矩阵元素最大值”命令按钮时，找出矩阵中最大的数，并显示在标签Label3中。当单击“对角线元素之和”命令按钮时，计算矩阵主对角线元素之和，并显示在标签Label4中。文件中已给出部分程序，请编写“找矩阵元素最大值”及“对角线元素之和”两个命令按钮的事件过程中的部分程序代码。

　　注意：

　　不得修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后，两个命令按钮的事件过程必须至少各执行一次。

　　解题思路：

　　启动Visual Basic系统，打开考生文件夹下需编辑的工程文件sjt5.vbp，相应的窗体文件名为sjt5.frm。

　　由于所提供的窗体程序不完整，需在“找矩阵元素最大值”命令按钮的Click事件过程中加入语句：

　　Private Sub Command1_Click()

　　'====考生编写程序开始====

　　Max = a(1, 1)

　　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

　　Label3.Caption = Max

　　'====考生编写程序结束====

　　'不得修改以下部分

　　save Label3

　　End Sub

　　在“对角线元素之和”命令按钮的Click事件过程中加入语句：

　　Private Sub Command2_Click()

　　'====考生编写程序开始====

　　Sum = 0

　　For i = 1 To 4

　　Sum = Sum + a(i, i)

　　Next i

　　Label4.Caption = Sum

　　'====考生编写程序结束====

　　'不得修改以下部分

　　save Label4

　　End Sub

　　参考文件：c:\wexam\26990001\hlpsys\参考答案\sjt5.vbp、sjt5.frm、sjt5.vbw、out5.txt

　　请把这些文件复制到c:\wexam\26990001中，然后打开sjt5.vbp文件并运行。

　　相关推荐：

　　2012年计算机等考四级数据库工程师备考笔记汇总

　　2012年计算机等级考试二级VB重点知识汇总

　　2012年下半年计算机等级考试报名时间及入口汇总