首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下已有一个工程文件sit5.vbp。运行程序后,分别从两个文件中读出数据,放入两个一维数组a、b中。请编写程序,当单击“合并数组”按钮时,将a、b数组中相同下标的数组元素的值求和。并将结果存入数组c。单击“找最大值”按钮时,调用find过程分别找
在考生目录下已有一个工程文件sit5.vbp。运行程序后,分别从两个文件中读出数据,放入两个一维数组a、b中。请编写程序,当单击“合并数组”按钮时,将a、b数组中相同下标的数组元素的值求和。并将结果存入数组c。单击“找最大值”按钮时,调用find过程分别找
admin
2016-12-29
33
问题
在考生目录下已有一个工程文件sit5.vbp。运行程序后,分别从两个文件中读出数据,放入两个一维数组a、b中。请编写程序,当单击“合并数组”按钮时,将a、b数组中相同下标的数组元素的值求和。并将结果存入数组c。单击“找最大值”按钮时,调用find过程分别找出a、c数组中元素的最大值,并将所找到的结果分别显示在Text1、Text2中。在给出的窗体文件中已经有了全部控件,但程序不完整。
要求:去掉程序中的注释符,把程序中的?改为正确的内容,并编写相应程序,实现程序的功能。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后,各命令按钮的事件过程必须至少各执行一次。
选项
答案
【操作步骤】 步骤1:打开考生文件夹下的本题工程文件sjt5.vbp,打玎代码编辑窗口,在指定位置编写代码。 参考代码: Private Sub find(X()As Integer,t As TextBox) ====以下为考生编写的程序==== Max:x(1) For i=2 To UBound(x) If x(i)>Max Then Max=X(i) End If Next t.Text=Max ====考生编写的程序结束==== End Sub Private sub command2.C1 ick() ====以下为考生编写的程序==== For i=1 To UBound(a) C(i)=a(i)+b(i) Next ====考生编写的程序结束===== Open App.Path&”\out51.txt”For Output As#1 For i=0 TO 9 Print#1,C(i) Next Close31 End Sub 步骤2:按要求将文件保存至考生文件夹中。 步骤3:按
键运行程序,先单击“读数据”按钮,再单击“合并数组”按钮,最后单击“找最大值”按钮。
解析
转载请注明原文地址:https://kaotiyun.com/show/c9Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Commandl的命令按钮,并有如下程序:PrivateSubCommandlClick()x=15DoWhilex2>0x=x-3x=IIf(Int(x/5)=x/5,X+2,
窗体上有一个名称为Commandl的命令按钮,其中部分代码如下:PrivateSubCommandl——Click()Dima(10)AsInteger。DimnAsIntegerCallcalc(a,n)
下面不属于软件设计阶段任务的是()。
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:PrivateSubCommand1_Click()Dima1(4,4)a2(4,4)DimiAsInteger,jAsInte
阅读程序:PrivateSubForm_Click()a=0Forj=1To15a=a+jMod3NextjPrintaEndSub程序运行后,单击窗体,输出结果是______。
改变驱动器列表框的Drive属性值将激活______事件。
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后如果在文本框中输入文本,则标签中立即显示相同的内容。以下可以实现上述操作的事件过程是()。
在窗体上画一个文本框,其名称为Text1。为了在程序运行后Text1中的文本不可编辑,应当使用的语句是______。
下面4项中不属于面向对象系统三要素的是()
随机试题
决定新闻单位效率的重要因素是()
就物质的反映特性而言( )
关于闭合性肝外伤的声像图特征叙述,正确的是
何谓大量咯血
下列关于国际银团贷款的表述,说法正确的有:
某企业2011年12月31日银行存款日记账余额为10万元,经查无记账差错,但发现:(1)企业期末计提了12月1日至31日的定期存款利息2万元;(2)银行支付了水电费5万元,但企业尚未入账;(3)企业已转账支付购买办公用品款1万元,但银行尚未入账。则该企业1
根据下表,回答96-100题。2006-2008年间,表中港口有几个在7月出现过货运吞吐量比上年同期下降的局面?
思想道德和法律都是调解人们思想行为、协调人际关系、维护社会秩序的重要手段。两者的关系是()
Thepassingtravellersaid,"Whateveryouplease."itmeant(意指,意味着)Whichofthefollowingistrue?
PassageThree(1)Arecomfortshoesalwaysmorehealthful?Notnecessarily,accordingtosomefootdoctors.Buyingshoesfr
最新回复
(
0
)