首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有一个工程文件sjt4.vbp,包含了所有控件和部分程序。程序运行时,请按以下顺序操作: 1)单击“读入数据”按钮,可把考生目录下的文件in4.dat中的100个整数读到数组a中; 2)从名称为Comb01的组合框中选中一项(如
在考生目录下有一个工程文件sjt4.vbp,包含了所有控件和部分程序。程序运行时,请按以下顺序操作: 1)单击“读入数据”按钮,可把考生目录下的文件in4.dat中的100个整数读到数组a中; 2)从名称为Comb01的组合框中选中一项(如
admin
2016-01-31
24
问题
在考生目录下有一个工程文件sjt4.vbp,包含了所有控件和部分程序。程序运行时,请按以下顺序操作:
1)单击“读入数据”按钮,可把考生目录下的文件in4.dat中的100个整数读到数组a中;
2)从名称为Comb01的组合框中选中一项(如图3-51所示)。
3)单击“计算”按钮,则可按该选项的要求对a中的数计算平均值(四舍五入取整或截尾取整)并放到文本框中。
4)单击窗体右上角的关闭按钮结束程序。
“读入数据”按钮的Click事件过程已经给出,请为“计算”按钮编写适当的事件过程实现上述功能。
提示:存放前n个数之和的变量应使用Long类型。
注意:不得修改已经存在的程序,在结束程序运行之前,必须进行一次计算,且必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名存盘。
选项
答案
审题分析 本题是一个简单的累加求和再求平均值的问题,根据在组合框中选择的列表项不同,进行计算的项数也不同,但都是用循环完成,在循环中实现累加,在循环后实现求平均值,区别只在于循环的次数不一样。 操作步骤 步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,双击“计算”按钮,打开代码编辑窗口编辑计算按钮的单击事件。 参考代码: Private Sub Command2_Click() Dim i,j As Long If Combo1.Text="前50个数"Then j=0 For i=1 To 50 j=j+a(i) Next j=Round(j/50,0) Text1.Text=j End If If Combo1.Text="前80个数"Then 1=0 For i=1 To 80 j=j+a(i) Next j=Round(j/80,0) Text1.Text=j End If If Combo1.Text="所有数"Then j=0 For i=1 To 100 j=j+a(i) Next j=Round(j/100,0) Text1.Text=j End If End Sub 步骤2:按要求将文件保存至考生文件夹中。 步骤3:运行程序,单击“读入数据”按钮,然后在列表框中选中一项,并单击“计算”按钮获得一个结果,然后使用窗体右上角的“关闭"按钮结束程序。 考点链接 数组定义与操作、If选择结构、For循环结构。
解析
转载请注明原文地址:https://jikaoti.com/ti/aVJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
新建一个窗体,其BorderStyle属性设置为FixedSingle,但运行时却没有“最大化”和“最小化”按钮,可能的原因是
耦合和内聚是评价模块独立性的两个主要标准,其中______反映了模块内各成分之间的联系。
3在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Text1),然后编写如下事件过程:PrivateSubCommandl_Click()x=Val(Text1.Text)SelectCaseX
设有如下通用过程:PublicSubFun(a(),ByValxAsInteger)Fori=1To5x=x+a(i)NextEndSub在窗体上画一个名称为Text1的文本
数据库系统中实现各种数据管理功能的核心软件称为【】。
以下关于函数过程的叙述中,正确的是()。
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Fori=1To4x=4Forj=1To2x=x+6NextNextPrintxEndSub程序运
决定一个窗体有无控制菜单的属性是______。
栈通常采用的两种存储结构是
下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整。PrivateTypeAng KAsInteger
随机试题
佝偻病常见的胸部改变是()
消渴病,小便频数,混浊如膏,甚至饮一溲一,面容憔悴,耳轮干枯,腰膝酸软,四肢欠温,畏寒肢冷,阳痿,舌苔淡白而干,脉沉细无力。宜选下述何方加减治疗( )
在生产过程中,把生产性噪声归纳为()类型。
设立期货交易所,负责审批的机构是()。
税务机关实施的下列具体行政行为中,属于行政复议受案范围的有()。
病毒无_______结构,由_______和_______组成。
物体知觉可以分为()。
在新世纪新阶段,维护和实现社会公平的根本途径是()。
教育制度有两个方面,一是义务教育,一是高等教育。一种合理的教育制度,要求每个人都享有义务教育的权利并且有通过公平竞争获得高等教育的机会。以下哪项是上述题干的推论?
有如下类声明和函数声明:classBase{intm;public:intn;protected:intp;};classDe
最新回复
(
0
)