首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp,如图3—164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
在考生文件夹中有一个工程文件sjt5.vbp,如图3—164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
admin
2017-10-27
52
问题
在考生文件夹中有一个工程文件sjt5.vbp,如图3—164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计算结果显示在标签lblSecond中。
已给出了部分程序,请编写“计算”命令按钮事件过程中的部分程序代码,以便完成上述功能。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后,必须执行程序,并用“计算”按钮进行计算,否则无成绩。
选项
答案
【操作步骤】 步骤1:打开考生文件夹下的工程文件sjt5.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 iblSecond.Caption=Sum lblFirst.Caption=Counter 步骤2:按
键运行程序,然后单击“计算”按钮。 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/gVGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列关于关系运算的叙述中正确的是()。
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程:PrivateSubCommand1_Click()S=0Fori
下列关于菜单的说法错误的是()。
在窗体中添加一个命令按钮和一个文本框,并编写如下程序代码:PrivateSubCommand1_Click()k=0DoWhilek<70k=k+2k=k*k+k
下列关于类、对象、属性和方法的叙述中,错误的是()。
执行语句Open"TC.dat"ForRandomAs#1Len=50后,对文件TC.dat中的数据能执行的操作是()。
软件测试的目的是()。
在窗体上画一个名称为List1的列表框,为了对列表框中的每个项目都能进行处理,应使用的循环语句为______。
在关系数据库中,把数据表示成二维表,每一个二维表称为【】。
随机试题
Manypeoplewanttoknowhowtoanalyzeproblemstheymeet.Therearesixstagesinanalyzingaproblem.Firstthepersonmu
男性,38岁,上腹部疼痛6年,多发生于餐前半小时,伴有反酸、嗳气,服用抗酸剂后疼痛可缓解。首先应考虑哪种疾病
一般立柱式支持装置可带动χ线管完成几个方向的移动
患儿6个月,以面黄,手有震颤来医院就诊。问病史发现一直羊奶喂养。血红蛋白80/L,血涂片中红细胞形态大小不等,以大红细胞为多。首先考虑
下述镇痛药中在治疗剂量不抑制呼吸的药物是
某处于衰竭期的煤矿2015年11月开采原煤10万吨,当月全部对外销售,向购买方收取的含增值税价款共计5860万元,其中包括购买方延迟付款违约金5万元、将原煤从坑口运输到车站的运输费用10万元。已知原煤适用的资源税税率为8%,则该煤矿2015年11月应纳资源
我国城市化进程的加快,使大量的城市近郊农村纷纷转为城市,农民变为城市居民,村委会变成了居委会。这种现象被称为()。
简述以下概念和范畴:“休眠效果”、“一面提示”与“两面提示”、“免疫”效果、诉诸理性与诉诸感情、恐惧诉求(警钟效果)、自信心假说。
“三个代表”重要思想是马克思主义中国化的最新理论成果。它与马克思列宁主义、毛泽东思想、邓小平理论是一脉相承的统一的科学理论。这种一脉相承具体表现在
Isdentistrythecareerforyou?Today’sdentistshavemanymoreopportunitiesthantheyusedto.Inthepast,adentist’slife
最新回复
(
0
)