首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下有一个工程文件sjt3.vbp,其功能是: ①单击“读数据”按钮,则将考生文件夹下in3.dat文件中的100个0~999的整数读入到数组a中; ②单击“计算”按钮,则找出这100个整数中的所有水仙花数,并将它们的最大值与最小值分别显示在文本框
考生文件夹下有一个工程文件sjt3.vbp,其功能是: ①单击“读数据”按钮,则将考生文件夹下in3.dat文件中的100个0~999的整数读入到数组a中; ②单击“计算”按钮,则找出这100个整数中的所有水仙花数,并将它们的最大值与最小值分别显示在文本框
admin
2016-06-23
54
问题
考生文件夹下有一个工程文件sjt3.vbp,其功能是:
①单击“读数据”按钮,则将考生文件夹下in3.dat文件中的100个0~999的整数读入到数组a中;
②单击“计算”按钮,则找出这100个整数中的所有水仙花数,并将它们的最大值与最小值分别显示在文本框。Text1、Text2中(注:当一个数的值等于该数中的各位数字的立方和时,此数被称为水仙花数。如:153=1
3
+5
3
+3
3
,所以153就是一个水仙花数)。
在窗体文件中已经给出了全部控件(如图所示)和“读数据”命令按钮的事件过程以及判断一个数是否为水仙花数的通用过程。要求编写“计算”命令按钮的事件过程。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行前,必须进行“计算”,并且必须通过单击窗体右上角的“关闭”按钮结束程序,否则无成绩。最后,程序按原文件名存盘。
选项
答案
[操作步骤] 步骤1:按照题目要求打开工程文件。 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考代码 Dim i As Integer Dim max As Integer,min As Integer max=-1 min=1000 For i=1 To 100 If isnarc(a(i))Then’调用isnarc判断是否为水仙花数 If max<=a(i)Then max=a(i) If min>=a(i)Then min=a(i)’求水仙花 数中的最大值与最小值 End If Next i Text1=max Text2=min 步骤3:按照题目要求调试并运行程序,如图3.18所示。 [*] 步骤4:关闭程序后,按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/70Lp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名为Commandl的命令按钮,并有如下程序:PrivateSubCommandl_Click()Dima(10),x%a(k)=Int(Rnd*90+10)x=x+a(k)Mod2P
阅读程序:Functionfac(ByValnAsInteger)AsIntegerDimtempAsIntegertemp=1Fori%=1Tonte
阅读下面的程序段:a=0Fori=1To3Forj=1ToiFork=jTo3a=a+1NextkNext
下列关于数据库设计的叙述中,正确的是
在软件测试设计中,软件测试的主要目的是
在窗体模块中用Public定义的变量的作用范围是
长度为n的顺序存储线性表中,当在任何位置上插入一个元素概率都相等时,插入一个元素所需移动元素的平均个数为______。
下列叙述中,不属于软件需求规格说明书的作用的是
用树形结构表示实体之间联系的模型是____________。
一名学生只能住一间宿舍,一间宿舍可住多名学生,则实体“宿舍”与实体“学生”的联系属于______________的联系。
随机试题
在这种山区道路怎样跟车行驶?
试述人民法院处理财产分割问题应遵循的规则。
患儿,男,6岁,有自发疼史。近1周来,右下后牙食物嵌塞。检查:右下第一乳磨牙远中邻面深龋洞。探敏,叩(一),无松动,龈(一)。右下第二乳磨牙大面积龋坏,探及髓腔,无感觉,叩(+)。颊侧瘘管溢脓,I度松动,左下第一、二乳磨牙残冠,I度松动,叩(+),龈红肿。
24岁男性,1小时前右手拇指近端被刀完全切断。清创后,应按哪个顺序进行再植手术
下列哪种情况不需要做出血时间测定
毕I式胃切除术与毕Ⅱ式胃切除术相比优点是()
【背景资料】某工程项目发包人与承包人签订了施工合同,工期5个月。分项工程和单价措施项目的造价数据与经批准的施工进度计划如表5.1所示;总价措施项目费用9万元(其中含安全文明施工费用3万元);暂列金额12万元。管理费用和利润为人材机费用之和的15%。规费和
A方案的综合资金成本为( )。根据上述计算,该公司应该选择( )方案进行筹资。
风险资本计量不包括()的计量。
已知某投资项目的原始投资额现值为100万元,净现值为25万元,则该项目的现值指数为()。(2014年)
最新回复
(
0
)