首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp,如图3.164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
在考生文件夹中有一个工程文件sjt5.vbp,如图3.164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
admin
2017-09-22
24
问题
在考生文件夹中有一个工程文件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全国计算机二级
相关试题推荐
在VisualBasic中按文件的访问方式不同,可以将文件分为顺序文件,随机文件和【】。
事件驱动是一种适用于______的编程方式。
设窗体上有一个标签Label1和一个计时器Timer1,Timer1的Interval属性被设置为1000,Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。下列可以实现上述要求的事件过程是()。
阅读下列程序: PrivateSubCommand1_Click() DimiAsInteger,kAsInteger k=2 Fori=1To3 PrintH(k); Nexti EndSub Fu
在窗体上有一个命令按钮,然后编写如下事件过程 PrivateSubCommand1_cickc() a=InputBox("enterthefirstinteger") b=InputBox("enterthesecon
下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整()。PrivateTypeAngKAsInteger
随机文件使用Put语句写数据,使用【】语句读数据。
以下程序计算自然数e的值,要求精确到1015,阅读下列程序。已知e的计算公式为:e=1+1/1!+1/2!+…+1/n!。请在【】和【】处填上正确内容。PrivateSubCommandl_Click()【】n=0:term
在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:PrivateSubCommand1_Click()DimaAsInteger,bAsString,cAsIntegera=1234:
随机试题
改错题(1)用横线标出并改正下列词语中的错别字穿流不息世外桃园(2)修改病句并说明错误的原因你们是演员,咱们写剧评,我们都是戏曲工作者。
男性,43岁。参加长跑过程中发生晕厥,心电图示“窦性停搏”,为除外病态窦房结综合征,进行食管心脏电生理检查,以下哪项指标最有意义
女性,65岁。1月前因股骨颈骨折行皮肤牵引,6h前突发气促、持续右胸痛。胸部X线检查示:右肺纹理变细,肺野透亮度增加,肺动脉段膨隆,少量右胸积液。多次心电图未见ST段抬高。该患者最可能的诊断是
用于通气力学监测的指标包括
进行病毒病原学检查的标本递送要求是
藤黄常采用的炮制方法是()。
对于总价合同,以下说法不正确的是( )。
根据学生的绘画作品进行分析,了解学生的心理特点,属于作品分析法。()
转变政府职能的根本途径是()。
在窗体上画一个名称为CommonDialog1的通用对话框,一个名称为Command1的命令按钮。然后编写如下事件过程:PrivateSubCommand1_Click()CommonDialog1.FileNa
最新回复
(
0
)