在考生文件夹下有一个工程文件sjt5．vbp。其窗体中有2个标题分别为“读数据”和“查找水仙花数”的命令按钮。请画1个名称为Text1、初始值为空的文本框，该文本框允许显示多行内容，且有垂直滚动条，如图所示。程序功能如下： (1)考生文件

admin2019-05-14 63

问题在考生文件夹下有一个工程文件sjt5．vbp。其窗体中有2个标题分别为“读数据”和“查找水仙花数”的命令按钮。请画1个名称为Text1、初始值为空的文本框，该文本框允许显示多行内容，且有垂直滚动条，如图所示。
程序功能如下：
(1)考生文件夹下in5．dat文件中存放着100个三位正整数。单击“读数据”按钮，则将in5．dat文件中的数据读入数组a中；
(2)单击“查找水仙花数”按钮，则查找in5．dat中的所有水仙花数，并将这些水仙花数顺次显示在Text1文本框内。(水仙花数是指一个3位数，它各位数字的立方和等于它本身，例如153就是水仙花数，因为153＝1³＋5³＋3³)
“读数据”按钮的Click事件过程已经给出，请编写函数narc，以完成“查找水仙花数”按钮的Click事件过程，实现上述功能。

注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须使用“查找水仙花数”按钮完成查找水仙花数的过程，且必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。

选项

答案【操作步骤】步骤1：打开本题工程文件。步骤2：向窗体中添加一个Text文本框控件，并根据题目要求设置Text的相关属性，设置方法如表4．7所示，设置结果如图4．6所示。 [*] 步骤3：打开代码编辑窗口，填入相应的代码以实现题目的功能。参考答案 Function narc(P As Integer) As Boolean (p＼100)＾3＝p Then flag＝True End If narc ＝flag End Function 步骤4：调试并运行程序，结果如图4．7所示。关闭程序后按题目要求存盘。 [*]

解析

转载请注明原文地址:https://kaotiyun.com/show/eTUp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

二级VB

NCRE全国计算机二级

在考生文件夹中有一个工程文件vbs5.vbp(相应的窗体文件为vbsj5．frm)。窗体Forml上有两个名称为Lab1和Lab2的标签，它们的标题分别为“密码”和“允许次数”；一个名称为Cmdl的命令按钮，其标题为“确定”；两个名称分别为Txt1和Txt

(1)在名称为Forml的窗体上画一个名称为lblPwd的标签，标题为“密令”；画两个文本框，名称分别为txtPwd、txtObi，都没有初始内容；再画三个命令按钮，名称分别为cmdShow、cmdide、cmdCopy，标题分别为“显示”、“隐藏”、“复

对于埋地设备及管道防腐蚀结构的施工质量检查项目不包括()。

设备及安装工程概算费用由设备购置费和安装工程费组成，设备购置费是指为项目建设而购置或自制的达到固定资产标准的设备、工器具、交通运输设备、生产家具等费用，还包括()。

一条信息对部分人是有价值的，而对其他人无价值，这说明信息具有()。【2009年真题】

仓库按保管物品种类多少可以分为()。

根据人民警察录用的有关规定，下列说法正确的是()。

设A是3阶矩阵，λ1=1，λ2=2，λ3=3是A的特征值，对应的特征向量分别是ξ1=[2，2，－1]T，ξ2=[－1，2，2]T，ξ3=[2，－1，2]T．又β=[1，2，3]T．计算：(1)Anξ1；(2)Anβ．

Accordingtothefirstparagraph,thegrandfatherresentedAccordingtotheauthor,thesafetynetcan

Rightatmomentalotofattention______tochildrenwholeaveschoolunabletoreadorwrite.