首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。其功能是产生并显示一个数列的前n项。数列产生的规律是:数列的前2项是小于10的正整数,将此两数相乘,若乘积<10,则以此乘积作为数列的第3项;若乘积≥10,则以乘积的十位数为数列的第3项,以乘积的个位数为数列的
在考生文件夹下有一个工程文件sjt5.vbp。其功能是产生并显示一个数列的前n项。数列产生的规律是:数列的前2项是小于10的正整数,将此两数相乘,若乘积<10,则以此乘积作为数列的第3项;若乘积≥10,则以乘积的十位数为数列的第3项,以乘积的个位数为数列的
admin
2016-06-23
30
问题
在考生文件夹下有一个工程文件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 Command1_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+1 If k<=
n
Then ’当k>n时,则数列数已够,不用求下一项 d=C Mod 10 Text4=Text4&""&d
b
=d’将余数作为下一次循环的后一项 End If End If Loop End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://jikaoti.com/ti/v9J0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要将窗体Form1标题设为“学习VB”,以下能正确实现该功能的语句为
向顺序文件Temp.txt中写入1,2,3这3个数。在程序中加入以下语句的哪一项可以使程序功能完整。PrivateSubCommand1_Click() Open"c:\Temp.txt",OutputAs#1 For
为组合框Combo1增加一个数据项“计算机”,下列命令正确的是()。
窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序:DimyAsIntegerPrivateSubCommand1_Click()DimxAsIntegerx=2Te
某二叉树中度为2的结点有18个,则该二叉树中有______个叶子结点。
某二叉树中度为2的结点有n个,则该二叉树中有______个叶子结点。
以下叙述中,错误的是()。
对已在窗体中控件的操作不正确的是()。
设A$=“北京”,B$=“Shanghai”,则表达式LEFTS(A$,2)+STRINGS(3,"-")+LEFTS(BS,8)构成的字符串是
A=7,B=3,C=4,则表达式AMOD3+B^3/C\5的值为______。
随机试题
控制的关键为
患者,女,30岁,有风湿性心脏病,二尖瓣狭窄病史10余年,现孕6个月,今日起突感气促,不能平卧,体验:发绀,两肺满布湿性啰音,伴喘鸣。诊断应首先考虑
患者,男,7岁。因“发热、头痛、呕吐4天,烦躁不安1天”入院。体检:体温39.5℃,脉搏125次/分,烦躁,颈抵抗,腹部可见数个出血点,克氏征阳性,布氏征阴性。外周血象:WBC18×109/L,N0.89。脑脊液:压力300mmHg,细胞数2300×1
患者,女,26岁。突发四肢乏力不适1天,下肢明显。发病前有饮酒史,既往曾发作2次,每次发作腰穿检查脑脊液,常规及生化无异常发现。体格检查:四肢肌力减低,肌张力下降,腱反射消失,感觉正常。最可能的诊断是
女性,36岁,低热伴胸闷、气急3周入院,经检查拟诊心包积液,下列哪一项体征不符合心包积液
孙某是某大型公共建筑消防安全管理部门中档案管理的负责人,负责消防控制室、办公室档案。档案内容有:该建筑的基本概况;该建筑关于成立消防管理机构的会议纪要和文件;消防设施、灭火器材情况和消防设施管理制度;消防控制室值班记录;该建筑消防验收的文件和资料;专职消防
下列关于会员制期货交易所的说法,正确的有( )。
根据以下资料,回答下列问题。E省统计局公布的数据显示,2014年上半年E省实现地区生产总值(GDP)5141.7亿元,同比增长了6.8%.比全国平均水平低了0.6个百分点。分产业来看,第一产业增加值268.79亿元,同比增长4.0%;第二产业增加值31
A、 B、 C、 D、 E、 C
Officialhealthadvicethatsaidhouseholdchoreshelpkeepyouactivehasbeenprovedwrongbytheresearch,whichshowsthatt
最新回复
(
0
)