首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp,如图3—164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
在考生文件夹中有一个工程文件sjt5.vbp,如图3—164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
admin
2017-10-27
40
问题
在考生文件夹中有一个工程文件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全国计算机二级
相关试题推荐
下列可作为VisualBasic中所允许的形式的数是______。
在窗体上画一个命令按钮Command1,然后编写如下程序:PrivateSubCommand1_Click()Dimarr()AsIntegerReDimarr(3)Fori=0To3al
数据的基本单位是【】。
以下叙述正确的是
在窗体中画一个命令按钮,然后编写以下事件过程:PrivateSubCommand1_Click()Forj=1To3PrintTab(3*j)11*(2*j-1);
使用CoamonDialog控件的______方法可显示”打印”对话框。
下列程序的功能是:将数据1,2,…,8写入顺序文件Num.txt中,请补充完整。PrivateSubForm_Click()DimiAsInteger Open"Num.txt”ForOutputAs#1
设a=2,b=3,c=4,下列表达式的值是______。Nota<=cOr4*c=b^2Andb<>a+C
下面程序是由鼠标事件在窗体上画图,如果按下鼠标可以画图,双击窗体则可以清除所画图形。补充完整下面的程序。首先在窗体层定义如下变量:DimPaintStartAsBoolean编写如下事件过程:PrivateSubForm_Load()Dr
某二叉树的先根遍历序列为CEDBA,中根遍历序列为DEBAC,则其后根遍历序列为【】。
随机试题
()是基金投资面临的基金交易对象无力履约而给基金带来的风险。
Thereason______I’mwritingistotellyouaboutapartyonSaturday.
以下最适宜作桥体龈面的材料是
男性,16岁,突然四肢弛缓性瘫痪,双侧面瘫一周来院,无尿便失禁,无发热,腰穿正常。病前无感染史,首先应想到的诊断是
患者,女,29岁,遭遇交通事故,头部外伤,昏迷,入院住ICU病房,在以下观察中非必需的是
患者,男性,60岁。左肺癌根除术后2小时,患者自觉胸闷,呼吸急促,测血压、脉搏均正常,见水封瓶内有少量淡红色液体,水封瓶长玻璃管内的水柱不波动。考虑为
项目总承包工程管理模式的缺点包括( )。
股票分割会使股票的每股市价下降,可以提高股票的流动性。()
2009年6月,广州亚运城市志愿服务拉开序幕,13000多个市民争当爱心推广大使,积极投身于“促文明、迎亚运”的活动当中去。这反映了人的价值在于()。
甲某向乙某借了5万元的高利贷,事后乙某向甲某讨还时,甲某矢口否认,并且将乙某强行关在自家的地下室里,对其殴打,让乙某将借据交出,并强迫乙某书写字据称甲某已经将5万元还给乙某了,否则就不放乙某,乙某无奈只得照办。则()。
最新回复
(
0
)