首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp,包含了所有控件和部分程序,如图所示。其功能如下: ①单击“读数据”按钮,可将考生文件夹下in4.dat文件中的100个整数读到数组a中。 ②单击“计算”按钮,则根据从组合框Combo1中选中的项目,对数组a中的
在考生文件夹下有一个工程文件sjt4.vbp,包含了所有控件和部分程序,如图所示。其功能如下: ①单击“读数据”按钮,可将考生文件夹下in4.dat文件中的100个整数读到数组a中。 ②单击“计算”按钮,则根据从组合框Combo1中选中的项目,对数组a中的
admin
2016-06-23
49
问题
在考生文件夹下有一个工程文件sjt4.vbp,包含了所有控件和部分程序,如图所示。其功能如下:
①单击“读数据”按钮,可将考生文件夹下in4.dat文件中的100个整数读到数组a中。
②单击“计算”按钮,则根据从组合框Combo1中选中的项目,对数组a中的数据计算平均值,并将计算结果四舍五入取整后显示在文本框Text1中。
“读数据”按钮的Click事件过程已经给出,请为“计算”按钮编写适当的事件过程实现上述功能。
注意:不得修改已经存在的控件和程序,在结束程序运行之前,必须进行一次计算,且必须用窗体右上角的关闭按钮结柬程序.否则无成绩。最后,程序按原文件名存盘。
选项
答案
[操作步骤] 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,在代码编辑窗口指定位置编写以下代码。 参考代码 Dim k As Long Dim m As Long Dim q As Long Dim P As Long Dim r As Long Dim n As Long For k=1 To 100 If a(k)Mod 2=0Then’判断是否为偶数 m=m+a(k)’偶数之和 q=q+1’偶数个数加1 Else n=n+a(k)’奇数之和 P=P+1’奇数个数加1 End If Next k r=Int((m+n)/(p+q)+0.5)’平均值 m=Int(m/q+0.5)’偶数平均值 n=Int(n/P+0.5)’奇数平均值 Select Case Combol.Text Case"所有偶数" Text1=m Case"所有奇数" Text1=n Case"所有数" Text1=r End Select 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/HSLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关于过程及过程参数的描述中,错误的是
模块独立性是软件模块化所提出的要求,衡量模块独立性的度量标准则是模块的
假定有如下事件过程:PrivateSubForm_MouseDown(BuaonAsInteger,ShiftAsInteger,xAsSingle,y_AsSingle) IfButton=2Then
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:OptionBase1PrivateSubCommand1_Click()Dima s=0:j=1 a=Array(1,2,
下列语句的输出结果是______。PrintFormat$(1258.6,"000,000.00")
窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序:DimyAsIntegerPrivateSubCommand1_Click()DimxAsIntegerx=2Te
用户可以用______语句定义自己的数据类型。
在下列关于菜单的说法中,错误的是
数学公式(x+y)4的VB算述表达式是______。
把数学表达式表示为正确的VB表达式应该是()。
随机试题
甲股份有限公司为募集资金,拟于2008年5月公开发行公司债券,确定发行方案如下:(1)经过清产核资,公司现有净资产为5000万元;(2)公司上一次发行债券的数额为1000万元,尚未到期,本次拟发行债券1500万元;(3)为发行公司债券,公司成立公司债券发行
属于空腔性病变的是
委托代理链最上方的是()。
已知工作A的紧后工作是B和C,工作B的最迟开始时间为14,最早开始时间为10;工作C的最迟完成时间为16,最早完成时间为14;工作A的自由时差为5天,则工作A的总时差为()天。
老李的家庭资产负债表中,期初净值为58万元(成本)、105万元(市价),期末净值为68万元(成本)、123万元(市价)。则家庭资产账面价值变动为()。
(2011年)甲公司产品需经过两道工序加工完成,原材料在开始生产时一次投入,生产成本在完工产品和在产品之间的分配采用约当产量比例法。2011年2月与产品生产成本有关的资料如下: (1)月初在产品费用为:直接材料120万元,直接人工60万元,制造费用20
在定向营销时,银行应重点营销优质客户,但在办理业务时应做到公平,不可区别对待。()
根据以下资料,回答问题。2013年上半年,浙江省规模以上工业企业营业收入和利润总额分别为28544.6亿元和1380.2亿元,同比分别增长8.1%和13.0%,增幅比上年同期分别回升0.6和3.4个百分点;企业亏损面和亏损率分别为20%和12.7%,增幅
在教育测量调查中,适用于次数、百分比统计而不适用于中位数、等级相关系数统计的测量类型是()。
HowtoWriteaThesisI.Introductionpart—writingthe【B1】afterfinishingtherest【B1】______—includingahookatthebegin
最新回复
(
0
)