首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。其功能是产生并显示一个数列的前n项。数列产生的规律是:数列的前2项是小于10的正整数,将此两数相乘,若乘积<10,则以此乘积作为数列的第3项;若乘积≥10,则以乘积的十位数为数列的第3项,以乘积的个位数为数列的
在考生文件夹下有一个工程文件sjt5.vbp。其功能是产生并显示一个数列的前n项。数列产生的规律是:数列的前2项是小于10的正整数,将此两数相乘,若乘积<10,则以此乘积作为数列的第3项;若乘积≥10,则以乘积的十位数为数列的第3项,以乘积的个位数为数列的
admin
2019-06-24
53
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
为了验证一个正整数n(n>3)是否为素数,最直观的方法是,看在2~n/2范围内能否找到一个整数m将n整除,若m存在,则n不是素数;若找不到m,则n为素数。在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有1个名称为Text1的文本框。请根据上面的算法
下面的程序执行完毕后,组合框中数据项的值是()。PrivateSubForm_Click()Fori=1To6Combo1.AddItemiNextiFori=1To3Combo1.RemoveItemiNextiE
在考生文件夹中有一个工程文件sjt5.vbp,如图3—164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
(1)考生文件夹下有一个工程文件sjt3.vbp,其窗体上有1个名称为Text1的控件数组;一个标题为"排序"的命令按钮。程序运行时,在文本框数组中输入8个整数,如图3—29(a)所示;然后单击”排序”按钮,则8个整数按降序排序,如图3—29(b)所示。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上建立一个名称为Command1的命令按钮数组,含三个命令按钮,它们的Index属性分别为0、1、2,标题依次为“是”、“否”、“取消”,每个按钮
窗体上有一个名称为Command1的命令按钮。其单击事件过程如下:PrivateSubCommand1_Click()Open"c:\f1.txt"ForInputAs#1:Open"c:\f2.txt"ForOut
假定有如下事件过程:PrivateSubForm_Click0DimXAsInteger,nAsIntegerx=1:n=0DoWhilex
对于能够获得焦点的控件,若要使其不能接收焦点,应该
下列不能打开工具箱窗口的操作是()。
软件按功能可以分为应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是()。
随机试题
∫02|x—1|dx=____________.
Forsometimepastithasbeenwidelyacceptedthatbabiesandothercreatureslearntodothingsbecausecertainactsleadto"
患者,女,21岁。2周来右上后牙遇冷、热过敏。检查发现右下6深龋,探之未穿髓,病变组织颜色较浅,易剔除。做诊断时应与之鉴别的主要疾病是
麻疹前驱期历时3~4日,症状有
设计安全等级为二级的某公路桥梁,由多跨简支梁组成,其总体布置如题图所示。每孔跨径25m,计算跨径为24m,桥梁总宽为10.5m,行车道宽度为8.0m,两侧各设1m宽人行步道,双向行驶二列汽车。每孔上部结构采用预应力混凝土箱梁,桥墩上设立四个支座,支座的横桥
一、背景某机电安装公司承担北方某城市小区供热管网工程施工,开工前,项目经理进行了全面的质量策划,并指令专业工程师编制质量控制程序。工程按期完工,由于建设单位配套设施尚不具备条件,虽已到供暖期,没能进行试运。由于寒潮突然袭击,使当地气温骤降,随后检
对下列概念理解正确的是()。
Hishandshookalittleashe______thekeyinthelock.
A、 B、 C、 D、 A第一列三个基础图形旋转45°和90°得到第二、三列图形,但是两边的线段相对于中间的连结线的位置改变。
阐述研究假设的特点并论述提出研究假设的基本方法及应注意的问题。
最新回复
(
0
)