首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp c,其窗体中有2个标题分别为“读数据”和“查找水仙花数”的命令按钮。请画1个名称为Text1、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图所示。 程序功能如下: (1)考生文件夹下in5.
在考生文件夹下有一个工程文件sjt5.vbp c,其窗体中有2个标题分别为“读数据”和“查找水仙花数”的命令按钮。请画1个名称为Text1、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图所示。 程序功能如下: (1)考生文件夹下in5.
admin
2017-12-14
57
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
VisualBasic中的控件分为3类,它们是标准控件、【】和可插入对象。
单击命令按钮时,下列程序的执行结果是PrivateSubCommand1_Click()BT4EndSubPrivateSubBT(xAsInteger)x=x*2+1Ifx<6ThenCallBT
对于图书管理数据库,将图书表中"人民邮电出版社"的图书的单价涨价5%。请对下面的SQL语句填空:UPDATE图书【】WHERE出版单位="人民邮电出版社"
数据库设计包括两个方面的设计内容,它们是
将E-R图转换到关系模式时,实体与实体间的联系可以表示成()。
将E-R图转换为关系模式时,实体和联系都可以表示为
下列关于栈的叙述中,正确的是
在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框,其名称分别为Drivel、Dirl和Filel,为了使它们同步操作,必须触发驱动器的Change事件和目录的Change事件,在这两个事件中执行的语句分别为()。
(1)请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Forml、标题为”标签”的窗体上画一个名称为Labell的标签,并设置适当属性以满足以下要求:①标签的内容为”计算机等级考试”;②标签可根据显示内容
在考生目录下有一个工程文件sjt4.vbp,包含了所有控件和部分程序,如图2-93所示。要求如下:①利用属性窗口设置适当的属性:为Listl列表框添加三个项目:宋体、黑体、楷体_GB2312;Textl文本框设置初始值为”计算机”;Hscroll1水
随机试题
在X6132型铣床上用盘形铣刀加工蜗杆。已知蜗杆轴向压力角αx1=20°,轴向模数mx1=4mm,头数z1=2,求交换齿轮速比i。
简述影响网络安全的因素。
放射治疗计划主要的执行者为
患者女性,24岁。孕37周,在家排便时。突然全身抽搐,持续约1分钟,家人即将其送往医院检查:血压170/108mmHg,下肢水肿(++),胎头先露,胎心率150次/分,有不规律宫缩。针对该孕妇以下护理措施中不正确的是
博物馆采光设计不宜采取下列哪种措施?(2008,25)
在小学综合实践活动开展过程中,不允许()。
下列诗句未涉及秋天的是()。
Manypeoplethinkofinternalcontrolasameansofsafeguardingcashandpreventingfraud.Althoughinternalcontrolisanimpor
YouaretheadministratorofSQLServer2000computernamedFABSQL2K01.YoucreateaDataTransformationServicespackagethatc
TheAmendmenttotheConstitutionwhichbannedslaveryis______.
最新回复
(
0
)