首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp,如图3.164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
在考生文件夹中有一个工程文件sjt5.vbp,如图3.164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
admin
2017-09-22
32
问题
在考生文件夹中有一个工程文件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://kaotiyun.com/show/PjGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
对长度为N的线性表进行顺序查找,在最坏情况下所需要的比较次数为______。
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1中显示出来。请填空。PrivateSubCommandl_Click()DiminDataAsString
数据库设计包括概念设计、【】和物理设计。
滚动条控件中,用来设置鼠标单击滚动箭头时滚动条移动的大小的属性是_______。
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Fomil中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger.则以下叙述中正确的是
通过文本框()事件过程可以获取文本框中输入字符的ASCII码值。
为命令按钮的Picture属性装入了一个图片,但却发现图片没有显示出来,要使图片显示出来,应设置它的【】属性。
若有一个动态数组a有两个元素a(0)和a(1),现要令数组a有三个元素a(0)、a(1)和a(2),则应当使用【】语句。
以下程序代码用来实现如下功能:单击命令按钮弹出对话框,在其中输入正数后单击确定,弹出一个提示信息显示刚才输入的正数,否则提示"error"。请填空。PrivateSubCommand1_Click()DimaAsInteger,bAsSt
在窗体上面一个命令按钮(其Name属性为Command1),然后编写如下代码:OptionBase1PrivateSubCommand1_Click()Dima(4,4)Fori=
随机试题
A.细胞水肿B.脂肪变性C.萎缩D.纤维素样坏死E.包裹钙化肺结核干酪样坏死转向愈合发生
A.窄谱抗生素B.广谱抗生素C.抑菌性抗生素D.杀菌性抗生素E.联合应用抗生素混合感染时选用
对于国有资金投资的建设工程招标,下列说法错误的是()。
根据法律规范的效力不同,我国现行的统计法律规范的表现形式主要包括统计法律、统计行政法规、地方性法规三种。()
对可撤销合同,当事人请求变更往往是无效的。()
因为学生进步明显,老师取消了对他的处分。这属于()。
近年来,不少国家纷纷实施“人与生物圈计划”,目的就是为了寻求同一个答案。为什么人类在享受自己获得和创造的财富时,会不时受到大自然种种惩罚?因为人类在土壤侵蚀、沙漠化、滥伐森林、越来越多的物种灭绝、环境污染等所导致的生态系统退化中,逐步意识到自身还没有真正揭
改变积分次序f(x,y)dx+f(x,y)dx.
已知A,B都是n阶矩阵,且P-1AP=B,若α是矩阵A属于特征值λ的特征向量,则矩阵B必有特征向量__________.
编写如下程序:PrivateSubCommand1_Click() Dimstr1AsString,str2AsString str1=InputBox("输入一个字符串") subfstr1,str2 Prints
最新回复
(
0
)