首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp,如图6所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计算结果显
在考生文件夹中有一个工程文件sjt5.vbp,如图6所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计算结果显
admin
2015-12-04
22
问题
在考生文件夹中有一个工程文件sjt5.vbp,如图6所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计算结果显示在标签lblSecond中。已给出了部分程序,请编写“计算”命令按钮事件过程中的部分程序代码,以便完成上述功能。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后,必须执行程序,并用“计算”,按钮进行计算,否则无成绩。
选项
答案
步骤.1:打开考生文件夹下的本题工程文件sjt,5,vbp,在代码编辑窗口的指定位置编写以下代码: For k=l To N Sum=Sum+a(k,k) Ifm[k,k),3=Int(、a(k,k)/3)Then Counter=Counter+1 End If Ifk<>N—k+l Then Ifa(k,N-k+1)/3=Int(a(k,N—k+1)/3)Thcn Counter=Counter+1 EndIf EndIf Next lblSecond.Caption=Sum lblFirst.Ca
解析
转载请注明原文地址:https://jikaoti.com/ti/YWJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下()程序段可以实施X、Y变量值的交换。
设窗体上有一个文本框,名称为Textl,程序运行后,要求该文本框只能显示信息,不能接收输入的信息,以下能实现该操作的语句是()。
表达式Val(".123E2")的值是()。
执行下列程序段后,输出的结果是Fork1=0To4y=20Fork2=0To3y=10Fork3=0To2y=y+10Nextk3,k2,k1Printy
双击窗体中的对象后,VisualBasic显示的窗口是()。
队列是限定在表的一端进行插入和在另一端进行删除操作的线性表。允许插入的一端称作______。
以下()操作不能打开属性窗口
一棵二叉树的中序遍历结果为DBEAFC,前序遍历结果为ABDECF,则后序遍历结果为。
数据结构分为线性结构和非线性结构,带链的队列属于__________________。
随机试题
患儿,男,7岁。睡中遗尿,尿频,面色无华,神疲乏力,少气懒言,不思饮食,便溏,自汗出,易感冒,舌淡,苔薄白,脉缓弱。该患儿的首选治法是
一平面简谐波的波动方程为y=2×10-2cos2π(10t-)(SI),对x=2.5m处的质元,在t=0.25s时,它的:
大气环境点源调查的内容包括()。
某施工单位承建两栋15层的框架结构工程。合同约定:①钢筋由建设单位供应;②工程质量保修按《建设工程质量管理条例》(国务院第279号令)执行。开工前施工单位编制了单位工程施工组织设计,并通过审批。施工过程中,发生下列事件:事件一:建设单位按照施工单位提出的某
以下各项中.属于客户申请融资融券业务时应向证券公司营业部提交的客户征信所需的相关材料的是()。Ⅰ.融资融券业务申请表Ⅱ.已在营业部开立的普通资金账户和证券账户Ⅲ.客户具有支配权的资产证明Ⅳ.有效身份证明文件
根据以下资料,回答问题。与2010年相比,2012年全国茶叶生产前十位省份茶园面积增速最慢的是:
设同一网络中有四台主机,主机1的IP地址为192.168.3.112,主机2的IP地址为192.168.3.120,主机3的IP地址为192.168.3.176,主机4的IP地址为192.168.3.222。共同的子网掩码是255.255.255.224。
有人说:“不到小三峡,不算游三峡,不到小小三峡,白来小三峡。”根据这句话,最有可能推出的结论是()
行政机关公布的信息应当全面、准确、真实,这体现了执法的()
IfIaskyouwhatconstitutes"bad"eating,thekindthatleadstoobesityandavarietyofconnecteddiseases,you’relikelyto
最新回复
(
0
)