首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp,如图2.129所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。甲击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
在考生文件夹中有一个工程文件sjt5.vbp,如图2.129所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。甲击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
admin
2016-12-29
72
问题
在考生文件夹中有一个工程文件sjt5.vbp,如图2.129所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。甲击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计算结果显示在标签IblSecond中。
已给出了部分程序,请编写“计算”命令按钮事件过程中的部分程序代码,以便完成上述功能。
注意:不能修改程序的其他部分和摔件属性。最后把修改后的文件按原文件名存盘。程序调试通过后,必须执行程序,并用“计算”按钮进行计算,否则无成绩。
选项
答案
【操作步骤】 步骤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 iblFirst.Caption=Counter 步骤2:按
键运行程序,然后单击“计算”按钮。 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/A9Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
当在滚动条内拖动滚动块时触发()。A.KeyUp事件B。KeyPress事件C.Scroll事件D.Change事件22.下面程序的输出结果是()。PrivateSubCommandlClick()Ch$=“
数据独立性分为逻辑独立性和物理独立性。当总体逻辑结构改变时,其局部逻辑结构可以不变,从而根据局部逻辑结构编写的应用程序不必修改,称为_________。
设菜单编辑器中各菜单项的属性设置如下表所示:针对上述属性设置,以下叙述巾错误的是()。
窗体上有一个名称为Labell的标签和一个名称为Commandl的命令按钮。命令按钮的单击事件过程如下:PrivateSubCommandlClick()x=InputBox("输入x:":..0)y=InputBox(
下面不属于软件设计阶段任务的是()。
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:PrivateSubCommand1_Click()Dima1(4,4)a2(4,4)DimiAsInteger,jAsInte
用下面的语句所定义的数组的元素个数是:______。Dimarr(3To5,-2to2)
VisualBasic提供的工具栏中,一般只显示______。
下列程序代码实现生成20个0~100之间的随机整数,存于数组中,打印数组中大于50的数,并求这些数的和。请选择正确的程序段(),完成程序。PrivateSubCommandlClick()Dimarr(1To20)
以下语句可以实现将文件filename1复制为filename2的是______。
随机试题
一般认为,管理科学开始于()
新录用的公务员试用期为
中国实现四个现代化的关键是()
女性,35岁。便秘2年,近半月来排便时肛门疼痛,粪便表面及便纸上附有鲜血。其诊断最可能是
某公司2012年12月31日,年终“本年利润”账户贷方余额3000000元,利润分配的“利润分配——未分配利润”账户贷方余额为250000元,经股东大会决议利润分配方案为“本年提取10%的法定盈余公积金、提取5%的任意盈余公积金、向投资者分配利润90
按照流动性溢价理论,上斜收益率曲线解释正确的有()。
香港全称为中华人民共和国香港特别行政区,由()内陆地区以及262个大小离岛组成。
求下列曲线所围成的图形的面积:
SirMartinSorrell,thechiefexecutiveoftheadvertisingconglomerateWPP,wasatKensingtonWade,Britain’sfirstprimarysch
【S1】【S9】
最新回复
(
0
)