首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。其功能是产生并显示一个数列的前n项。数列产生的规律是:数列的前2项是小于10的正整数,将此两数相乘,若乘积<10,则以此乘积作为数列的第3项;若乘积≥10,则以乘积的十位数为数列的第3项,以乘积的个位数为数列的
在考生文件夹下有一个工程文件sjt5.vbp。其功能是产生并显示一个数列的前n项。数列产生的规律是:数列的前2项是小于10的正整数,将此两数相乘,若乘积<10,则以此乘积作为数列的第3项;若乘积≥10,则以乘积的十位数为数列的第3项,以乘积的个位数为数列的
admin
2020-07-22
40
问题
在考生文件夹下有一个工程文件sjt5.vbp。其功能是产生并显示一个数列的前n项。数列产生的规律是:数列的前2项是小于10的正整数,将此两数相乘,若乘积<10,则以此乘积作为数列的第3项;若乘积≥10,则以乘积的十位数为数列的第3项,以乘积的个位数为数列的第4项。再用数列的最后两项相乘,用上述规则形成后面的项,直至产生了第n项。窗体上部从左到右3个文本框的名称分别为Text1、Text2、Text3,窗体下部的文本框名称为Text4。程序运行时,在Text1、Text2中输入数列的前两项,Text3中输入要产生的项数n,单击“计算”按钮则产生此数列的前n项,并显示在Text4中。如图所示。
已经给出了全部控件,但程序不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不得修改原有程序和控件的属性。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 Private Sub Commandl_Click() Text4=”” a=Val(Text1) b=Val(Text2) n=Val(Text3) Text4=Text4&a&“”&b ’文本框Text4中第二项的内容一定是b k=2 Do While k<n c=a*b k=k+1 If c<10 Then‘判断乘积是否小于10 Text4=Text4&“”&c’若小于10,则直接接到Text4文本末尾 a=b’将b赋给a成为下一次循环的前一项 b=c’将c作为下一次循环的后一项 Else d=c\10’当c大于10,则取整 Text4=Text4&””&d a=d’将十位数作为下一次循环的前一项 k=k+l If k<=n Then ’当k>n时,则数列数已够,不用求下一项 d=c Mod 10 Text4=Text4&””&d b=d ’将余数作为下一次循环的后一项 End If End If Loop End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/KjHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
A、选择B、投影C、自然连接D、并A由关系R到关系S为一元运算,排除C和D。关系S是关系R的一部分,是通过选择之后的结果,因此选A。
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:PrivateSubCommand1_Click() Dima(10)AsInteger,maxAsInteger Fork=1To10 a(k)=In
有下面程序代码:PrivateSubCommand1_Click()DimkAsIntegerFork=1To3Callfun(k)NextkFork=1To3
窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮,要求程序运行时,单击命令按钮(如图1所示),就可以把文本框中的内容写到文件Out.txt中,每次写入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是()。
窗体上有1个名称为Command1的命令按钮,事件过程如下:PrivateSubCommand1_Click() Dimx%,y%,z% x=InputBox("请输入第1个整数") y=InputBox("请输入第2个整数")
在菜单编辑器中建立如下图所示的菜单,并为了每个菜单项编写了鼠标单击事件过程。关于此菜单,以下叙述中错误的是( )。
程序运行时,要清除图片框Picture1中的图像,应使用语句()。
设:a=2,b=8,c=6,d=3,表达式a>bAndNot(c>d)Ord>c的值是
VisualBasic中的“启动对象”是指启动VisualBasic应用程序时,被自动加载并首先执行的对象。下列关于VisualBasic“启动对象”的描述中,错误的是
为了实现对象的自动拖放,应该设置该对象的一个属性。下面设置中正确的是
随机试题
土质路基施工前,采用()试验方法测定拟用土料的最佳含水量和最大干密度。
患者,男,52岁。3个月来乏力,面色苍白。化验血Hg62g/L,WBC3.2×109/L,分类N66%,L30%,M4%,Plt68×109/L。骨髓增生明显活跃,原始粒细胞4%,成熟粒细胞分叶过多,胞浆内颗粒少,红系有巨幼样变,全片见巨核细胞54个,易见
A.易并发肝癌B.女性多见C.男性多见D.儿童多见E.老年人多见乙型肝炎肝硬化
湿性坏疽的叙述,错误的是
下列哪项不是慢性盆腔炎的临床表现
根据《医疗机构制剂配制质量管理规范(试行)》,洁净室(区)应定期检测并记录()。
下列有关急腹症的说法,不正确的是
在双代号网络计划中,关键线路是()。
关于没收财产,下列说法正确的是()
某新兴产业在2005年末至2009年末产值的年平均增长率为q,在2009年末至2013年末产值的年平均增长率比前四年下降了40%,2013年的产值约为2005年产值的14.46(≈1.954)倍,则q的值约为().
最新回复
(
0
)