首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下已有一个工程文件sjt5.vbp。运行程序后,分别从两个文件中读出数据,放入两个一维数组a、b中。 请编写程序,当单击“合并数组”按钮时,将a、b数组中相同下标的数组元素的值求和,并将结果存入数组c。 单击“找最大值”按钮时,调用find过程分
在考生目录下已有一个工程文件sjt5.vbp。运行程序后,分别从两个文件中读出数据,放入两个一维数组a、b中。 请编写程序,当单击“合并数组”按钮时,将a、b数组中相同下标的数组元素的值求和,并将结果存入数组c。 单击“找最大值”按钮时,调用find过程分
admin
2015-05-30
53
问题
在考生目录下已有一个工程文件sjt5.vbp。运行程序后,分别从两个文件中读出数据,放入两个一维数组a、b中。
请编写程序,当单击“合并数组”按钮时,将a、b数组中相同下标的数组元素的值求和,并将结果存入数组c。
单击“找最大值”按钮时,调用find过程分别找出a、c数组中元素的最大值,并将所找到的结果分别显示在Text1、Text2中。在给出的窗体文件中已经有了全部控件,但程序不完整。
要求:去掉程序中的注释符,把程序中的?改为正确的内容,并编写相应程序,实现程序的功能。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后,各命令按钮的事件过程必须至少各执行一次。
选项
答案
【操作步骤】 步骤1:打开考生文件夹下的本题工程文件sjt5.vbp,打开代码编辑窗口,在指定位置编写代码。 参考代码: Max=x(1) Fori=2 To UBounD(x) Ifx(i)>Max Then Max=x(i) EnDIf Next t.Text=Max Fori=1 To UBounD(A c(i)=a(i)+b(i) Next 步骤2:按要求将文件保存至考生文件夹中。 步骤3:按
键运行程序,先单击“读数据”按钮,再单击“合并数组”按钮,最后单击“找最大值”按钮。
解析
本题中自定义过程finD的功能是找出数组参数x()中的最大值,并且将其放入文本框参数t中。其基本思路为:首先利用UbounD函数获得数组的长度,然后假设数组的第一个数为最大值,再由数组的第二个数直到最后一个数进行循环,在循环中对数组元素和最大值进行比较,二者中较大的数存入最大值变量,循环结束后将最大值显示在t中。在“合并数组”按钮的单击事件中,利用For循环依次将a、b数组中同下标的元素相加并且放入数组c中。
转载请注明原文地址:https://kaotiyun.com/show/4CQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮Command1,然后编写如下代码:PrivaeSubCommand1_Click()DimArr1(10)AsInteger,Arr2(10)AsIntegern=3F
下列程序运行后在立即窗口输出的结果是()。PrivateSubForm_Click()x="a":y="b"z=1:u=2Debug.Printx;y,z;uDe
下列程序段运行后窗体上输出结果为()。PrivateSubCommand1_Click()a=5:b=4:c=3:d=2x=3>2*bOra=cAndb<>cOrc>d
要从自定义对话框Form2中退出,可以在该对话框的“退出”按钮Click事件过程中使用()语句。
不能脱离控件(包括窗体)而独立存在的过程是()。
设有数组定义语句:Dima(5)AsInteger,并设List1为列表框控件。下列给数组元素赋值的语句错误的是()。
有下列二叉树,对此二叉树中序遍历的结果为()。
设A=2,B=-4,则表达式3*A>5OrB+8>0的值是______。
最简单的交换排序方法是()。
随机试题
TelevisionhastransformedpoliticsintheUnitedStatesbychangingthewayinwhichinformationisdisseminated,byalteringp
高血压病人麻醉前应
下列导致医院感染高度危险性的物品是
下列叙述正确的是
在感染性休克的治疗中,下列哪项是错误的
办理商品房预售证明时,应出具投入资金达到工程建设总投资()以上的证明。
入境旅游团抵达人住饭店后,地陪要协助领队和全陪办理住店手续,但不要()。
在下列模式中,能够给出数据库物理存储结构与物理存取方法的是()。
•Readthearticleaboutchoosinganagent.•Inmostofthelines34~45thereisoneextraword.Itiseithergrammaticallyincor
(1)Theurbanpopulationin2014accountedfor54%ofthetotalglobalpopulation,upfrom34%in1960,andcontinuestogrow.I
最新回复
(
0
)