首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。其功能是产生并显示一个数列的前n项。数列产生的规律是:数列的前2项是小于10的正整数,将此两数相乘,若乘积<10,则以此乘积作为数列的第3项;若乘积≥10,则以乘积的十位数为数列的第3项,以乘积的个位数为数列的
在考生文件夹下有一个工程文件sjt5.vbp。其功能是产生并显示一个数列的前n项。数列产生的规律是:数列的前2项是小于10的正整数,将此两数相乘,若乘积<10,则以此乘积作为数列的第3项;若乘积≥10,则以乘积的十位数为数列的第3项,以乘积的个位数为数列的
admin
2020-07-22
64
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮,要求程序运行时,单击命令按钮(如图1所示),就可以把文本框中的内容写到文件Out.txt中,每次写入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是()。
利用属性窗口为窗体的下面4个属性设置了值,其中错误的设置是()。
窗体上有一个名称为Command1的命令按钮,并有如下程序代码:OptionBase1PrivateSubCommand1_Click()Dima(4,4)AsIntegerDimb
在窗体上添加"控件"的正确的操作方式是( )。
编写如下程序:DimnumAsInteger,rAsInteger,nAsInteger,iAsIntegerDimarr(5)AsIntegerPrivateSubCommand1_Click()
在窗体上画一个名称为Combo1的组合框,名称为Text1的文本框,以及名称为Command1的命令按钮,如图所示。运行程序,单击命令按钮,将文本框中被选中的文本添加到组合框中,若文本框中没有选中的文本,则将文本框中的文本全部添加到组合框中。命
要清除已经在图片框Picturel中打印的字符串而不清除图片框中的图像,应使用语句()。
以下关于VB特点的叙述中,错误的是( )。
与数学式子对应的VisualBasic表达式是
以下关于VB对象属性的叙述中,错误的是
随机试题
采用专家小组法进行预测的程序包括
短期信贷市场的贷款最长期限为_______。
Access2010中,____________可以从一个或多个表中选取一组记录添加到一个或多个表中的尾部。
多发伤后最常见的并发症有()
普鲁卡因成人一次限量为
患者,男,45岁。主诉刷牙时牙龈出血,口腔有异味,双侧后牙及下前牙轻度松动,伴有咬合痛。如果行牙周手术,改良翻瓣术的正确切口是
到期不能收回的带息应收票据,企业仍应在中期期末及年末,按票据的面值与票面利率计提利息,计入“应收帐款”的帐面价值。()
20×3年,甲公司实现利润总额210万元,包括:20×3年收到的国债利息收入10万元,因违反环保法规被环保部门处以罚款20万元。甲公司20×3年年初递延所得税负债余额为20万元,年末余额为25万元,上述递延所得税负债均产生于固定资产账面价值与计税基础的差异
【2016河南郑州】良好的师生关系的建立取决于教师的教育水平,我国新型师生关系的特点是()。
在延安整风运动期间,毛泽东用“墙上芦苇,头重脚轻根底浅;山间竹笋,嘴尖皮厚腹中空”这副对联形象地讽刺了()。
最新回复
(
0
)