首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp c,其窗体中有2个标题分别为“读数据”和“查找水仙花数”的命令按钮。请画1个名称为Text1、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图所示。 程序功能如下: (1)考生文件夹下in5.
在考生文件夹下有一个工程文件sjt5.vbp c,其窗体中有2个标题分别为“读数据”和“查找水仙花数”的命令按钮。请画1个名称为Text1、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图所示。 程序功能如下: (1)考生文件夹下in5.
admin
2017-12-14
55
问题
在考生文件夹下有一个工程文件sjt5.vbp c,其窗体中有2个标题分别为“读数据”和“查找水仙花数”的命令按钮。请画1个名称为Text1、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图所示。
程序功能如下:
(1)考生文件夹下in5.dat文件中存放着100个三位正整数。单击“读数据”按钮,则将in5.dat文件中的数据读入数组a中;
(2)单击“查找水仙花数”按钮,则查找in5.dat中的所有水仙花数,并将这些水仙花数顺次显示在Text1文本框内。(水仙花数是指一个3位数,它各位数字的立方和等于它本身,例如153就是水仙花数,因为153=1
3
+5
3
+3
3
)
“读数据”按钮的Click事件过程已经给出,请编写函数Dare,以完成“查找水仙花数”按钮的Click事件过程,实现上述功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须使用“查找水仙花数”按钮完成查找水仙花数的过程,且必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名存盘。
选项
答案
向窗体中添加一个Text文本框控件,并根据题目要求设置Text的相关属性,根据代码中narc函数的首部,可以判断出该函数的功能是判断参数p是否为水仙花数,可以在函数中定义一个布尔型变量flag,将参数p表示的三位数的个位,十位,百位分别表示出来,通过if语句判断每位数的立方和是否与该数相等,若将flag设置为true,最后返回flag的值。 【操作步骤】 步骤1:打开本题工程文件。 步骤2:向窗体中添加一个Text文本框控件,并根据题目要求设置Text的相关属性.设置方法如表1.7所示。 [*] 步骤3:打开代码编辑窗口,填入相应的代码以实现题目的功能。 参考答案(阴影部分是需考生填入的内容) Function narc(p As Integer)As Boolean Dim flag As Boolean Flag=False If(p Mod 10)^3+(p)10Mod 10)^3+(p/100)^3=p Then Flag=True End If Nare=flag End Function 步骤4:调试并运行程序。关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/GMGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
单击一次命令按钮,下列程序代码的执行结果为()。PrivateSubCommandl_Click()DimaAsInteger,bAsInteger,CASIntegera=2:b=3:c=4
结构化程序设计主要强调的是
窗体上有一个名称为Listl的列表框,列表框中有若干数据项,列表框Style属性为l;有一个名称为Label2的标签:还有一个名称为Commandl,Caption属性为“计算”的命令按钮(见图)。运行程序,在列表框中选中某些数据项后,单击命令按钮,则可以
在窗体上画一个命令按钮,名称为Command1。单击命令按钮时,执行如下事件过程:PrivateSubCommand1_Click()a$="softwareandhardware"
定义枚举类型的变量所用的关键字是______。
数学式子5+(a+b)×2对应的VisualBasic表达式是_____________。
下列程序段的执行结果为______。Forx=5To1Step-1ForY=1To6-xPrintTab(Y+5);"*";NextYPrintNextx
下述关于数据库系统的叙述中正确的是______。
下列叙述中正确的是
下列模式中,能够给出数据库物理存储结构与物理存取方法的是()。
随机试题
教育学成为一门独立学科的标志是()
呼吸道异物症状及体征分期不包括
下列有关肝的描述正确的是
关于宪法与文化制度的关系,下列哪一选项是不正确的?
下列不属于信用贷款的征信要点的是()
巨额国家预算赤字不会造成巨额贸易赤字。如果能造成,则预算赤字最大的国家也会有最大的贸易赤字。实际上,当赤字的数字可以调节以至不同国家彼此确定相当时,没有这种联系。如果以上陈述都是正确的,能在它们的基础上正确地推出以下哪一项?()
ALetterofAdmissionWritealetterofabout100wordsbasedonthefollowingsituation:LiMing’sapplicationforadmi
在进行网络拓扑结构的选择时,主要考虑到的因素应该是(54)。
A、 B、 C、 D、 C集群技术是向一组独立的计算机提供高速通信线路,组成一个共享数据存储空间的服务系统,提高了系统的数据处理能力。如果一台主机出现故障,它所运行的程序将立即转移到其他主机,所以集群技术可大
综合业务数字网ISDN设计的目标是:提供一个在世界范围内协调一致的数字通信网络,支持各种通信服务,并在不同的国家采用相同的______。
最新回复
(
0
)