首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp,如图3—164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
在考生文件夹中有一个工程文件sjt5.vbp,如图3—164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
admin
2017-03-27
21
问题
在考生文件夹中有一个工程文件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全国计算机二级
相关试题推荐
下列程序段的执行结果为______。X=2Y=1IfX*Y<1ThenY=Y-1ElseY=-1PrintY-X>0
下列不能打开菜单编辑器的操作是()。
数据库系统的核心是
窗体上命令按钮Commandl的事件过程如下:PrivateSubCommand1_Click()DimtotalAsIntegertotal=s(1)+s(2)PrinttotalEndSubPrivateFunctions
属性窗口分为4个部分,这4个部分分别是______。
在程序运行时,可以通过______方法来移动滚动条的位置。
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下事件过程: PrivateSubCommand1_Click() n=Val(Text1.Text) Fori=2Ton Forj
下列程序的功能是;将数据1,2,…,8写入顺序文件Num.txt中,请选择正确的程序段()。PrivateSubForm_Click()DimiAsIntegerOpen"Num.txt"ForOut
窗体上有一个命令按钮Command1和一个列表框List1。先选择列表框中的某一个项目,然后单击命令按钮,将该项目从列表框删除。程序如下:PrivateSubCommand1_Click()DimInAsIntegerIn=______L
随机试题
风险收益率的大小与风险有关,风险越大,风险收益率—定越大。()
患者男,39岁,电脑工程师,长期熬夜,抽烟,突发剧烈胸痛及呼吸困难,急送就医。患者可先进行以下哪些检查来辅助诊断
护士通过交谈收集资料时,做法错误的是
《中共中央关于制定国民经济和社会发展第十一个五年规划的建议》提出,“十一五”期间我国经济与社会发展要坚持“六个必须”的原则,以下不属于“六个必须”原则内容的是()。
【背景资料】施工单位承建了某二级公路路基工程,路基宽度10m,其中K1+600~K1+900为软土地基,该路段原地面平坦,路基为填方路堤,设计采用碎石桩处理软基,碎石桩桩径D为0.5m,桩中心间距S为1.3m,正三角形布置,桩长h为6m,桩内填充
【背景资料】某施工单位中标A省某机场航站楼标识引导系统工程。该引导系统由一系列标识牌组成,部分标识牌有方向要求,且有部分标识牌样式、尺寸接近。施工单位组建了现场项目部,项目经理为一级注册建造师甲。本次施工招标以工程量清单方式计价,其中某
没有设立流域防汛指挥机构的流域洪水调度方案应报()批准。
何谓生产成本?何谓工艺成本?
垄断组织的建立,实质是为了()。
一项研究显示,先让受试者参加消除某项偏见的学习,并给受试者播放与消除该偏见学习相关联的声音。之后,让受试者进入深度睡眠状态,同时重复播放那些相关联的声音,以重新激活消除该偏见的学习。结果发现,该偏见比睡眠前大大减少,且睡眠质量越高,偏见减少得越多,研究人员
最新回复
(
0
)