首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。其功能是产生并显示一个数列的前n项。数列产生的规律是:数列的前2项是小于10的正整数,将此两数相乘,若乘积<10,则以此乘积作为数列的第3项;若乘积≥10,则以乘积的十位数为数列的第3项,以乘积的个位数为数列的
在考生文件夹下有一个工程文件sjt5.vbp。其功能是产生并显示一个数列的前n项。数列产生的规律是:数列的前2项是小于10的正整数,将此两数相乘,若乘积<10,则以此乘积作为数列的第3项;若乘积≥10,则以乘积的十位数为数列的第3项,以乘积的个位数为数列的
admin
2019-06-24
21
问题
在考生文件夹下有一个工程文件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:调试并运行程序,关闭程序后按题目要求存盘。
解析
Text3的数值是数列的项数,定义一个变量k,前两项已经确定,因此k的取值范围为3~n,先计算前两项的积,判断是否小于10,如果乘积小于10,则以此乘积作为数列的第3项数,如果乘积大于等于10,则以乘积的十位数为数列的第3项,以乘积的个位数为数列的第4项,再用数列的最后2项相乘,运用循环语句,用上述规则形成后面的项,直至产生了第n项。在这里运用的是Do While语句,与For语句有所不同,要注意区分。
转载请注明原文地址:https://kaotiyun.com/show/1qUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定窗体上有一个标签,名为Label1,为了使该标签透明并且没有边框,则正确的属性设置为()。
运行下面的程序,单击命令按钮,输出结果为()。FunctionF(aAsInteger)b=0:Staticcb=b+1:c=c+1:F=a+b+cEndFunctionPrivateSubCommand1_Click()
数列1,1,3,5,9,15,25,41,…,的规律是从第三个数开始,每个数是它前面两个数的和加1。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图3—192所示。请编写适当的事件过程实现以下功能:在Text1中输入整数40,单击
在考生文件夹中有一个工程文件sjt5.vbp。窗体外观如图3—169所示。运行程序,单击“读数据”按钮,文件中的数据被读入字符串变量中并显示在Label2标签中。单击“排序”按钮时,对读入的数据从小到大排序,并将排序结果显示在窗体的Label4控件中。要求
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行后,单击“读入数据”按钮,可把考生文件夹下in3.txt文件中的所有英文单词读入,并显示在Text1文本框中;单击“插入列表框”按钮,则按顺序把每个单词作为一项添加到List1列表框中(如图3—1
在窗体上画一个文本框,其名称为Text1,初始内容为空白,并设置成多行显示格式;然后再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“显示”和“保存”,如图3—111所示,编写适当的事件过程。程序运行后,如果单击“显示”按钮,则
设x是整型变量,与函数IIf(x>0,-x,x)有相同结果的代数式是
为了读取数据,需打开顺序文件“D:\data5.txt”,以下正确的命令是
假定有如下事件过程:PrivateSubForm_Click0DimXAsInteger,nAsIntegerx=1:n=0DoWhilex
在菜单编辑器中建立如下图所示的菜单,并为每个菜单项编写了鼠标单击事件过程。关于此菜单,以下叙述中错误的是()。
随机试题
党的过渡时期总路线适用的历史时期是()
妊娠期循环系统的生理变化,下列选项中正确的是()
A、PRPPB、PAPSC、FH4D、NAD+E、SAM甲基的活性供体
航空运输的成本结构是()。
一种最基本的言语方式,两个或几个人直接进行交际时的言语活动是()
设有如下记录类型:TypestudentNumberAsString*10NameAsString*8EndType窗体中有若干控件,单击其中的一个按钮Command1时,执行如下事件过程,该过程的功能是把数据输出到指定的文件中。根据
下列叙述中正确的是
IE浏览器收藏夹的作用是————。
中国科协10日发布的第二次全国科技工作者状况调查结果显示,我国科技人力资源总量已达5160万人,科技队伍年轻化、高学历化趋势明显。中国科协于2008年下半年组织开展了五年一次的“全国科技工作者状况调查”。这次调查共发放问卷32100份,回收有效问
Howeverimportantwemayregardschoollifetobe,thereisnodenyingspendmoretimeathomethanintheclassroom.Therefore,
最新回复
(
0
)