首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt5.vbp,其功能是:单击“读数据”按钮,则把考生目录下的文件in5.dat 中的100个整数读到数组a中;单击“计算”按钮,则找出其中与所有数的平均值(平均值截尾取整)最接近的整数,放到文本框中;单击“存盘”按钮则把计算结
在考生目录下有一个工程文件sjt5.vbp,其功能是:单击“读数据”按钮,则把考生目录下的文件in5.dat 中的100个整数读到数组a中;单击“计算”按钮,则找出其中与所有数的平均值(平均值截尾取整)最接近的整数,放到文本框中;单击“存盘”按钮则把计算结
admin
2019-01-16
69
问题
在考生目录下有一个工程文件sjt5.vbp,其功能是:单击“读数据”按钮,则把考生目录下的文件in5.dat 中的100个整数读到数组a中;单击“计算”按钮,则找出其中与所有数的平均值(平均值截尾取整)最接近的整数,放到文本框中;单击“存盘”按钮则把计算结果存盘。窗体中给出了所有控件(如图1-312所示)和“读数据”按钮及“存盘”按钮的Click事件过程,请为“计算”按钮编写适当的事件过程实现上述功能。
注意:不得修改已经存在的程序,在结束程序运行之前,必须用“存盘”按钮存储计算结果,否则无成绩。最后,程序按原文件名存盘。
提示:与平均值最接近的数可能大于也可能小于平均值。
选项
答案
【操作步骤】 步骤1:打开考生文件中的本题工程文件sjt5.vbp,在代码编辑窗口中,编写“计算”按钮的单击事件过程。 参考代码: Private Sub Command2_Click() Dim i, j, k, i1 As Integer j = 0 For i = 1 To 100 j = j + a(i) Next i j = Fix(j / 100) k = Abs(a(1) - j) i1 = 1 For i = 2 To 100 If Abs(a(i) - j) < k Then k = Abs(a(i) - j) i1 = i End If Next i Text1.Text = a(i1) End Sub 步骤2:按要求将文件保存至考生文件夹中。 步骤3:按
键运行程序,先单击“读数据”按钮,再单击“计算”按钮,最后单击“存盘”按钮。
解析
转载请注明原文地址:https://kaotiyun.com/show/guFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
利用通用对话框控件打开字体对话框的操作是
下面关于直线控件的叙述中正确的是
编写如下程序:PrivateSubCommand1_Click()DimxAsIntegerx=10Printfun1(x,12)+xEndSubPrivateFunctionfun1(mAsI
编写如下程序:PrivateSubCommand1_Click()DimnAsInteger,tAsLongStaticsAsIntegert=1Forn=1To3t=
窗体上有一个名称为Combo1的组合框,要求在其编辑区输入文本并按回车键后,编辑区中的文本被添加到列表中。下面能实现这一功能的是( )。
下面正确使用动态数组的是( )。
结构化程序设计的基本原则不包括( )。
工程中有Form1、Form2两个窗体(Form1中有文本框Text1;Form2中有Text1文本框和Command1命令按钮)。Form1是启动窗体。在这些模块中编写下面的程序代码:Form1中的代码如下:PrivateSubT
设窗体上有一个名称为Timer1的计时器控件,其Interval属性被设置为500,Enabled属性被设置为True;还有一个名称为Text1的文本框和下面的事件过程:PrivateSubTimer1_Timer()Sta
随机试题
男性,25岁,汽车撞击右髋部4小时,有尿意但不能自主排尿。体检:血压110/80mmHg,脉搏94次/分,腹软、下腹部隆起伴轻压痛、肠鸣音正常、右髋部肿胀、皮下淤血。直肠指检前列腺尖部浮动,X线摄片示:双侧耻骨上下支骨折。导尿时F24号导尿管可无阻力全
某老人行走时突然跌倒,神志不清,即送医院。经检查发现一侧上下肢瘫痪,口斜眼歪,一侧瞳孔直径5mm,另一侧瞳孔直径3mm,其原因是
××省属亚热带温湿气候,夏季最高气温40℃,冬季最低气温一10℃。6~7月为梅雨季节,年平均降雨量在1234mm以上。11月至次年3月空气湿度较大,经常大雾弥漫,能见度极差。省内公路、铁路、内河航运十分便利。该省现有的大地控制网受地壳变动和社会建设发展等
重力坝按坝体高度分为高坝、中坝和低坝,其中高坝的高度大于()m。
梁桥轻型墩中,()、施工简便、外形美观、过水性良好,适用于地基土软弱的地区。
观察(x3)’=3x2,(x5)’=5x4,(sinx)’=cosx,由归纳推理可得:若定义在R上的函数f(x)满足f(-x)=-f(x),记g(x)为f(x)的导函数,则g(-x)=().
眼手协调活动是婴儿认知发展过程中的重要里程碑,也是手的真正探索活动的开始。()
王某是某市一国有公司的经理,张某是该企业的副经理。2005年,该公司进行产权制度改革,将国有公司改制为管理层控股的股份有限公司。其中,王某、张某及其他15名干部职工分别占40%、30%、30%股份。在改制过程中,国有资产管理部门委托某资产评估所对该公司的资
【B1】【B15】
Physicalfitnessistheresultofmanyfactors—goodmedicalcare,propernutrition,adequaterestandrelaxation,andsensiblep
最新回复
(
0
)