首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其功能是: ①单击“读数据”按钮,则把考生文件夹下in5.dat文件中的100个0~999之间的整数读入数组a中; ②单击“计算”按钮,则对这100个整数中的所有水仙花数(当一个数的值等于该数中
在考生文件夹下有一个工程文件sjt5.vbp,其功能是: ①单击“读数据”按钮,则把考生文件夹下in5.dat文件中的100个0~999之间的整数读入数组a中; ②单击“计算”按钮,则对这100个整数中的所有水仙花数(当一个数的值等于该数中
admin
2018-10-29
20
问题
在考生文件夹下有一个工程文件sjt5.vbp,其功能是:
①单击“读数据”按钮,则把考生文件夹下in5.dat文件中的100个0~999之间的整数读入数组a中;
②单击“计算”按钮,则对这100个整数中的所有水仙花数(当一个数的值等于该数中各位数字的立方和时,此数被称为水仙花数。例如,153=1
3
+5
3
+3
3
,所以153就是一个水仙花数)求平均值,并对该平均值数尾取整后显示在文本框Text1中。
窗体中给出了所有控件(如图1-183所示),已给“读数据”按钮的Click事件过程,请为“计算”按钮编写适当的事件过程实现上述功能。
注意:不得修改已经存在的控件和程序,在结束程序运行之前,必须进行计算,且必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件夹下的本题工程文件sjt5.vbp,在代码编辑窗口的指定位置编写“计算”按钮的单击事件过程。 参考代码: Dim s As Long, n As Integer For i = 1 To 100 If isnarc(a(i)) Then s = s + a(i) n = n + 1 End If Next i Text1.Text = Fix(s / n) 步骤2:按要求将文件保存至考生文件夹中。 步骤3:按<F5>键运行程序,先单击“读数据”按钮,接着单击“计算”按钮,然后单击窗体右上角的关闭按钮结束程序。
解析
转载请注明原文地址:https://jikaoti.com/ti/3Gm0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在名称为Frame1的框架中,有两个名称分别为op1、op2的单选按钮,标题分别为"单程"、"往返",如图所示。以下叙述中,正确的是( )。
以下关于文件的叙述中,错误的是( )。
某人编写了下面的程序:PrivateSubCommand1_Click() DimaAsInteger,bAsInteger a=InputBox("请输入整数") b=InputBox("请输入整数") pro
已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下:OptionBase1PrivateSubCommand1_Click() DimsumAsInt
若已把一个命令按钮的Default属性设置为True,则下面可导致按钮的Click事件过程被调用的操作是( )。
设窗体的名称为Form1,标题为Win,则窗体的MouseDown事件过程的过程名是( )。
下面不能在信息框中输出"VB"的是( )。
设有如下通用过程:PublicFunctionFun(xStrAsString)AsString DimtStrAsString,strLAsInteger tStr="" strL=Len(xStr) i=strL
命令按钮、单选按钮、复选框都可以通过Picture属性在控件上显示图片,但需事先设置某一属性,该属性为
窗体上已有1个名称为Picture1的图片框,要求实现下面2个功能之一:(1)在窗体上移动鼠标时,立即将Picture1显示在鼠标位置(2)在窗体上单击鼠标时,立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件过程是
随机试题
苏舜钦诗歌的风格特征是()
画出企业库存管理的数据流图。其处理过程如下: 仓库部门负责维护库存基础数据(数据在库存系统设置文件和物品代码文件中),若有业务,则进行库存处理(数据在物品货位库存文件和物品仓库库存文件中),其业务单据报财务部门,其他部门的物品进出也要进行库存处理,并存
患儿,男,6岁。患有猩红热,丹痧布齐后2天,身热渐退,咽部疼痛减轻,伴见唇干口燥,干咳,食欲不振,舌红少津,苔剥脱,脉细数。其辨证为
男性患者,55岁,头痛3个月,多见于清晨,常出现癫痫发作,经检查诊断为颅内占位性病变、颅内压增高,拟行开颅手术。开颅手术最危险的并发症是
甲欲购枪杀人,在A市购买手枪一支,后将被害人乙约至B市将乙杀死。5日后甲潜逃至C市因形迹可疑被C市公安机关抓获。对于此案的审判管辖,下列说法正确的是:
国际工程项目建筑安装工程费用盈余不包括()。
下列谱例中的旋律选自清唱剧《长恨歌》的()。
设α是n维单位列向量,E为n阶单位矩阵,则()
在使用PowerPoint2010放映演示文稿过程中,要使已经点击访问过的超链接的字体颜色自动变为红色,正确的方法是()。
WritingaResearchPaperI.ResearchPaperandOrdinaryEssayA.Similarityin【T1】______:【T1】______e.g.—choosingatopic—
最新回复
(
0
)