首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbpo其窗体中有2个标题分别为“读数据”和“查找水仙花数”的命令按钮。请画1个名称为Text1、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图所示。 程序功能如下: (1)考生文件
在考生文件夹下有一个工程文件sjt5.vbpo其窗体中有2个标题分别为“读数据”和“查找水仙花数”的命令按钮。请画1个名称为Text1、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图所示。 程序功能如下: (1)考生文件
admin
2017-07-28
39
问题
在考生文件夹下有一个工程文件sjt5.vbpo其窗体中有2个标题分别为“读数据”和“查找水仙花数”的命令按钮。请画1个名称为Text1、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图所示。
程序功能如下:
(1)考生文件夹下in5.dat文件中存放着100个三位正整数。单击“读数据”按钮,则将in5.dat文件中的数据读入数组a中;
(2)单击“查找水仙花数”按钮,则查找in5.dat中的所有水仙花数,并将这些水仙花数顺次显示在Text1文本框内。(水仙花数是指一个3位数,它各位数字的立方和等于它本身,例如153就是水仙花数,因为153=1
3
+5
3
+3
3
)
“读数据”按钮的Click事件过程已经给出,请编写函数narc,以完成“查找水仙花数”按钮的Click事件过程,实现上述功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须使用“查找水仙花数”按钮完成查找水仙花数的过程,且必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名存盘。
选项
答案
步骤1:打开本题工程文件。 步骤2:向窗体中添加一个Text文本框控件,并根据题目要求设置Text的相关属性,设置方法如表1.7所示。 [*] 步骤3:打开代码编辑窗口,填入相应的代码以实现题目的功能。 参考答案 Function narc(p As Integer)As Boolean Dim flag As Booleam flag=False If (p Mod 10)^3+(p\10 Mod 10)^3+(p\100)^3=p Then flag=True End If narc=flag End Function 步骤4:调试并运行程序。关闭程序后按题目要求存盘。
解析
向窗体中添加一个Text文本框控件,并根据题目要求设置Text的相关属性,根据代码中narc函数的首部,可以判断出该函数的功能是判断参数p是否为水仙花数,可以在函数中定义一个布尔型变量flag,将参数p表示的三位数的个位,十位,百位分别表示出来,通过if语句判断每位数的立方和是否与该数相等,若将flag设置为true,最后返回flag的值。
转载请注明原文地址:https://kaotiyun.com/show/BxGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如图所示,在列表框List1中已经有若干人的简单信息,运行时在Text1文本框(即“查找对象”右边的文本框)中输入一个姓或姓名,单击“查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹配
不能脱离控件(包括客体)而独立存在的过程是
下面叙述正确的是
假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Form1和Form2,启动窗体为Form1。在Form1上画一个命令按钮Command1,程序运行后,要求当单击该命令按钮时,Form1窗体消失,显示窗体Form2,请将下面的程序补充完
为了使计时器控件Timer1每隔0.5秒触发一次Timer事件,应将Timer1控件的【】属性设置为【】。
在窗体上添加一个命令按钮,名为Command1,然后为该命令按钮编写如下事件过程,该过程执行结果为______。OptionBase1PrivateSubCemmand1_Click()DimaAsVarianta=Arr
下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请选择正确的程序段是(),将程序补充完整。PrivateTypeAngKAsInteg
下列不属于软件调试技术的是______。
在用通用对话框控件建立“打开”或“保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件),则正确的描述格式是
表达式"12345"<>"12345"&"ABC"的值是______。
随机试题
盛唐最著名田园山水诗人是孟浩然和_____。他们的诗歌表现祖国山河的壮丽和田园的自然质朴,诗中有画。
Austin-Flint杂音见于()
治疗肺热燥咳宜选用
甲公司为从事石油化工及投资的大型企业。甲公司下属子公司乙公司于2007年在香港成功发行股票并上市。2010年9月乙公司购入总部位于英国的丙公司4.2%的股份。经过与丙公司的接触,乙公司认为,全面收购丙公司符合其长远发展目标。丙公司在尼日利亚的全资子公司是其
下列关于普通股发行定价方法的说法中,正确的是()。
建设部2000年6月30日发布并开始施行《房屋建筑工程质量保修办法》中对屋面防水工程、有防水要求的卫生间、房间和外墙面的防渗漏保修年限为()。
东晋南北朝时期,江南经济迅速发展,乃至有“江南之为国盛矣”的赞叹。该时期江南开发的主要因素不包括()。
“字字写来都是血,十年辛苦不寻常”是对()的评价。
(2012年下半年)Simple公司承接了Perfct市数字城管工程建设项目,委派小刘负责该项目的质量保证工作。在项目的执行过程中,由于数字城管建设涉及到该市的很多职能部门,互相之间的协调和沟通费时、费力,且在不同单位之间存在需求方面的不一致,导
Inthissection,youwillhearashortpassage.Thereare10missingwordsorphrases.Fillintheblankswiththeexactwordso
最新回复
(
0
)