首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹中有一个工程文件sjt5.vbp,如图2.129所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。甲击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
在考生文件夹中有一个工程文件sjt5.vbp,如图2.129所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。甲击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
admin
2016-12-29
97
问题
在考生文件夹中有一个工程文件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全国计算机二级
相关试题推荐
以下程序的功能是从随机产生的20个20~200(含20和200)的整数中,找出能够同时被3和5整除的数的最大值,并显示出来,请填空。OptionBaselPrivateSubCommandlClick()Dima(2
数据独立性分为逻辑独立性和物理独立性。当总体逻辑结构改变时,其局部逻辑结构可以不变,从而根据局部逻辑结构编写的应用程序不必修改,称为_________。
以下关于文件及相关操作的叙述中错误的是()。
窗体上有一个名称为Commandl的命令按钮,其事件过程如下:PrivateSubCommandlClick()DimiAsInteger,jASlnteger,kAsIntegerDimSASDOUble
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:PrivateSubCommand1_Click()Dima1(4,4)a2(4,4)DimiAsInteger,jAsInte
阅读程序:PrivateSubForm_Click()a=0Forj=1To15a=a+jMod3NextjPrintaEndSub程序运行后,单击窗体,输出结果是______。
不能打开菜单编辑器的操作是______。
图像框有—个属性,可以自动调整图像框的大小,以适应图像的尺寸,这个属性是______。
设在工程中有一个标准模块,其中定义了如下记录类型:TypeBooksNameAsString*10TelNumAsString*20EndType在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Com
随机试题
下面是一个Applet程序,其功能是根据给出的小时,分钟和秒数计算相等的秒数,即将1分钟化为60秒,依此类推。要求建立一个时间类,时间参数均作为类的成员变量,并且给出换算时间的方法,也作为这个类的成员函数,可以供外部对象进行调用。同时还需要在输出窗口中显示
TheRomanticMovementexpressedamoreorless______attitudetowardtheexistingsocialandpoliticalconditionsthatcamewit
被称为“孤府”的脏腑是
某市检察院在审查甲杀人案中,发现遗漏了依法应当移送审查起诉的同案犯罪嫌疑人乙。对此检察院应该如何处理?()
若纳税人在检查期间隐匿、销毁被检查的账簿资料即构成阻挠税务机关检查。()
在现代企业中,授权、评价和激励体系是在形象识别规范框架下的形象识别规范系统。
简述法律全球化的主要途径。
Realinnovationisadyingart.It’struethatcreativity—thebusinessofthinkingupnewideas—isfarfromdead,butit’sgetti
BecauseSouthAfricansaregenerallysobubbly(热情奔放的)andtalkative,silencesaysalot.Theyarepoliteaswellandifyouare
GetEnoughSleep—orElse!Agoodnight’ssleepismoreimportanttoyourhealththanyoumayrealize.[A]MeganJoneskne
最新回复
(
0
)