首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其功能是: ①单击“读数据”按钮,则把考生文件夹下in5.dat文件中的100个0~999之间的整数读入数组a中; ②单击“计算”按钮,则对这100个整数中的所有水仙花数(当一个数的值等于该数中各位数字的立方和
在考生文件夹下有一个工程文件sjt5.vbp,其功能是: ①单击“读数据”按钮,则把考生文件夹下in5.dat文件中的100个0~999之间的整数读入数组a中; ②单击“计算”按钮,则对这100个整数中的所有水仙花数(当一个数的值等于该数中各位数字的立方和
admin
2012-10-09
30
问题
在考生文件夹下有一个工程文件sjt5.vbp,其功能是:
①单击“读数据”按钮,则把考生文件夹下in5.dat文件中的100个0~999之间的整数读入数组a中;
②单击“计算”按钮,则对这100个整数中的所有水仙花数(当一个数的值等于该数中各位数字的立方和时,此数被称为水仙花数。例如,153=1
3
+5
3
+3
3
,所以153就是一个水仙花数)求平均值,并对该平均值数尾取整后显示在文本框Textl中。窗体中给出了所有控件(如图1-180所示),已给“读数据”按钮的Click事件过程,请为“计算”按钮编写适当的事件过程实现上述功能。
注意:不得修改已经存在的控件和程序,在结束程序运行之前,必须进行计算,且必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名存盘。
选项
答案
【操作步骤】 步骤l:打开考生文件夹下的本题工程文件sjt5.vbp,在代码编辑窗口的指定位置编写“计算”按钮的单击事件过程。 参考代码: Dim s As Long,n As Integer For i=l To 100 If isnarc(a(i))’2hen s=s+a(i) n=n+1 End If Next i Textl.Text=Fix(s/n) 步骤2:按要求将文件保存至考生文件夹中。 步骤3:按
键运行程序,先单击“读数据”按钮,接着单击“计算”按钮,然后单击窗体右上角的关闭按钮结束程序。
解析
程序设计思路:声明一个变量s用于记录水仙花数的和,一个变量n记录水仙花数的个数。用For循环逐一取出数组a中的100个元素,通过调用函数isnrc判断其是否为一个水仙花数,若是水仙花数则将其加入到累加和s中.同时令n=n+l。循环结束后,s/n的值就是水仙花数的平均数。
转载请注明原文地址:https://kaotiyun.com/show/U3hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()StaticyAsIntegerClsFori=0To2
设有下面的循环: i=0 Whilei<=1 i=i+3 Printi Wend则运行后的输出结果是
窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型声明TyPePersonnameASString*8majorASString
在窗体上画一个名称为List1的列表框,一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市的名称时,在标签中显示选中城市的名称。下列能正确实现上述功能的程序是
关系数据库的概念模型是
下列叙述中,不正确的是
下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整。 PrivateTypeAng KAsInteger S
下列语句的输出结果是【】。 PrintFormat$(1256,"000,000.00")
窗体、图片框或图像框中的图形通过对象的【】属性设置。
源程序中应包含一些内部文档,以帮助阅读和理解程序,源程序的内部文档包括选择合适的标识符、注释和
随机试题
自由贸易区
根据断肢损伤的性质,断肢一般可分为
会计是以( )作为主要计量单位。
银行公司信贷营销领导对整个银行公司信贷营销组织来说,要发挥()的作用。
Word的“字体”对话框中,可以设定文字的()。
欢笑:愉快
探险是指到从来没有人去过或很少有人去过的艰险地方去考察、寻究自然界情况的活动。从其行为定性而言,带有对未知危险程度和风险发生概率的自然环境和现象进行主动寻究、考察的特征,是明知有危险却主动去探究的自我冒险行为。根据上述定义,下列不属于探险的是()。
政府部门为了缩小地区间经济发展水平的差距,保持区域经济协调发展而采取的政策属于( )
设区域D={(χ,y)|0≤χ≤1,0≤y≤1},则|y-χ2|dχdy=_______.
软件生命周期一般包括软件开发期和软件运行期,下列()不是软件开发期应包含的内容。
最新回复
(
0
)