首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp,如图3.164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
在考生文件夹中有一个工程文件sjt5.vbp,如图3.164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
admin
2017-09-22
42
问题
在考生文件夹中有一个工程文件sjt5.vbp,如图3.164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计算结果显示在标签lblSecond中。
已给出了部分程序,请编写“计算"命令按钮事件过程中的部分程序代码,以便完成上述功能。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后,必须执行程序,并用“计算”按钮进行计算,否则无成绩。
选项
答案
步骤1:打开考生文件夹下的工程文件sjl5.vbp,在代码编辑窗口的指定位置编写以下代码。参考代码: For k=1 To 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+1 Then If a(k,N-k+1)/3=Int(a(k,N- k+1)/3)Then Counter=Counter+1 End If End If Next lblSecond.CaDtion=Sum lblFirst.CaDtion=Counter 步骤2:按
键运行程序,然后单击“计算”按钮。 步骤3:按要求将文件保存至考生文件夹中。
解析
矩阵主对角线上元素的特点:第一维下标与第二维下标相同:7*7矩阵次对角线上元素的特点:第一维下标与第二维下标之和为8。根据题意,可通过一个For循环,将满足主对角线上元素特点的数组元素累加入变量Sum。再通过一个嵌套的For循环逐一判断满足两个对角线上的元素特点的元素能否被3整除,若某数组元素能被3整除,则记录个数的变量Counter增1。
转载请注明原文地址:https://www.kaotiyun.com/show/PjGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
数据库设计包括概念设计、【】和物理设计。
数据库系统的三级模式分别为【】模式、内部级模式与外部级模式。
滚动条控件中,用来设置鼠标单击滚动箭头时滚动条移动的大小的属性是_______。
下列代码运行后输出结果是DefstrB-EPrivateSubCommand1_Click()B$="123"C="456"PrintB+C$EndSub
随机文件使用Put语句写数据,使用【】语句读数据。
启动窗体在【】对话框中指定。
若有一个动态数组a有两个元素a(0)和a(1),现要令数组a有三个元素a(0)、a(1)和a(2),则应当使用【】语句。
一个完整的程序必须完成3个层次的过程,它们分别是编码、测试和【】。
在窗体上面一个命令按钮(其Name属性为Command1),然后编写如下代码:OptionBase1PrivateSubCommand1_Click()Dima(4,4)Fori=
使用驱动器列表框的______属性可以返回或设置驱动器列表中当前选中的磁盘驱动器的索引值。
随机试题
发展好对外关系,必须正确处理好()
大面积烧伤不能判断是Ⅲ度或深Ⅱ度创面时,创面的手术处理方法应是
上消化道是指
基金()对其资产按规定进行估值。
一般资料:求助者,女性,37岁,已婚,中学教师。案例介绍:一年多前的一天,求助者无意间看见一位很熟悉的男老师的裤子拉链没有拉好,就开玩笑地说:“你也不把拉链拉好。”那位老师也和她开玩笑:“你看哪不好,非要盯着这不该看的地方看。”当时双方开了玩笑这
下列作者与作品对应不正确的一项是()。
下列选项中,降低进程优先级的合理时机是()。
甲醉酒驾驶,撞死一行人后逃逸,在被追赶时精神病复发。对甲()。(2014一专一4)
下列选项中,属于标签控件的“数据”属性的是()。
Howlongisitsincethefirstnewspaperwasprinted?
最新回复
(
0
)