首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp,如图3—164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
在考生文件夹中有一个工程文件sjt5.vbp,如图3—164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
admin
2017-03-27
59
问题
在考生文件夹中有一个工程文件sjt5.vbp,如图3—164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计算结果显示在标签lblSecond中。
已给出了部分程序,请编写“计算”命令按钮事件过程中的部分程序代码,以便完成上述功能。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后,必须执行程序,并用“计算”按钮进行计算,否则无成绩。
选项
答案
步骤1:打开考生文件夹下的工程文件sjt5.vbp,在代码编辑窗口的指定位置编写以下代码。 参考代码: For k=1To N Sum=Sum+a(k,k) If a(k,k)/3=Int(a(k,k)/3)Then Counter=Counter+1 End If If k<>N-k+1Then If a(k,N-k+1)/3=Int(a(k,N-k+1)/3)Then Counter=Counter+1 End If End If Next lblSecond.Caption=Sum lblFirst.Caption=Counter 步骤2:按<F5>键运行程序,然后单击“计算”按钮。 步骤3:按要求将文件保存至考生文件夹中。
解析
矩阵主对角线上元素的特点:第一维下标与第二维下标相同;7*7矩阵次对角线上元素的特点:第一维下标与第二维下标之和为8。根据题意,可通过一个For循环,将满足主对角线上元素特点的数组元素累加入变量Sum。再通过一个嵌套的For循环逐一判断满足两个对角线上的元素特点的元素能否被3整除,若某数组元素能被3整除,则记录个数的变量Counter增1。
转载请注明原文地址:https://kaotiyun.com/show/1hGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimiAsIntegerDimsumAsIntegerDimsu
在下列文件系统控件的事件中,当文件列表框的Path属性改变时发生的事件是______。
下列不能打开菜单编辑器的操作是()。
如果一个变量未经定义就直接使用,则该变量的类型为()。
在程序运行时,可以通过______方法来移动滚动条的位置。
数据结构分为逻辑结构和存储结构,循环队列属于【】结构。
有如下程序:FunctionF(aAsInteger)b=0StaticCb=b+1c=c+2F=a+b+cEndFunctio
文本框TextBox中的内容若要设置为用户不能修改,应设置()属性。
下列程序的功能是;将数据1,2,…,8写入顺序文件Num.txt中,请选择正确的程序段()。PrivateSubForm_Click()DimiAsIntegerOpen"Num.txt"ForOut
随机试题
企业经营战略层次体系包括()
给核心过程提供基础保证的活动过程称为()
煨法的目的是煅法的目的是
根据《中华人民共和国测绘法》,测量土地、建筑物、构筑物和地面其他附者物的权属界址线应当按照()确定的权属界线的界址点、界址线或者提供的有关登记资料和附图进行。
实行资本资金制度的投资项目,资本金的筹措情况应该在()中做出详细说明。
某市一基础设施项目进行招标,现拟组建评标委员会,按《评标委员会和评标方法暂行规定》,下列人员中不得担任评标委员会成员的有()。
如某建筑工程承包合同中订有仲裁条款,则双方结算价款产生纠纷时,可()。
某公司为了提升公司的业绩,通过对外招聘的方式,招聘了一名新的业务经理小张,小张在笔试方面表现非常优异。公司对他寄予了厚望。此外,小张培养了一名得力助手,非常优待他,但是对其他员工要求非常的严格,而且并不喜欢采纳员工的意见,因而和下级相处的并不好。一年过去了
从所给的四个选项中,选择最合适的一个填入问号处,使之呈现一定的规律性:
A、HefeltboringabouttheTVprogram.B、Helosthismealticketsinthecafeteria.C、HemissedagoodTVprogram.D、HisTVwas
最新回复
(
0
)