首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
以下数列:1,1,2,3,5,8,13,21…的规律是从第3个数外始,每个数都是其前面两个数之和。 在考生文件夹下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图所示。请编写适当的事件过程完成如下功能:选中一个单选按钮后,单击“计算”按钮,则
以下数列:1,1,2,3,5,8,13,21…的规律是从第3个数外始,每个数都是其前面两个数之和。 在考生文件夹下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图所示。请编写适当的事件过程完成如下功能:选中一个单选按钮后,单击“计算”按钮,则
admin
2020-06-30
51
问题
以下数列:1,1,2,3,5,8,13,21…的规律是从第3个数外始,每个数都是其前面两个数之和。
在考生文件夹下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图所示。请编写适当的事件过程完成如下功能:选中一个单选按钮后,单击“计算”按钮,则计算出上述数列第n项的值,并在文本框中显示,n是选中的单选按钮后面的数值(提示:因计算结果较大,应使用长整型变量)。
注意:不能修改已经给出的程序和已有的控件的属性;在结束程序运行之前,必须选中一个单选按钮,并单击“计算”按钮以获得一个结果;必须使用窗体右一卜角的关闭按钮结
束程序,否则无成绩。最后把修改后的文什按原文件名存盘。
选项
答案
步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 PriVate Sub Command1_Click() Dim a()As Long Dim i As Integer Dim n As Integer ’Opl.Count是单选按钮数目,这里用的是控件数组 For i=0 To Op1.Count-1 ’判断哪一项被选择,把它后面的数值赋给n,确定n值 If Op1(i).Value=True Then n=Val(Opl(i).Caption) Exi.t For End If Next ReDim a(n)’重新申请空间,这里是动态申请 a(1) =1 a(2)=1’数列第一项、第二项值确定 For i=3 To n a(i)=a(i-1)+a(i-2)’后一项值是前两项值之和 Next Text1.Text=a(n) End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
单选按钮数组常用于提供唯一选择,VHue属性值决定每个单选按钮的选中状态:FHse为未选中,True为选中,Caption属性用于设置单选按钮的标题。本题在For循环语句(循环变量k的初值为0,终值应为3)中逐一检查每个单选按钮是否被选中,用变量n记录选中单选按钮的索引号。然后取消对当前选中单选按钮的选择,使单选按钮数组中的卜一个按钮被选中。如果当前已经选中最后一个单选按钮,则将n赋值为0,最新从单选按钮数组的第一个元素开始。
转载请注明原文地址:https://kaotiyun.com/show/JIHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在考生目录下有一个工程文件sjt3.vbp,包含了所有控件和部分程序,如图1-23所示。要求如下:①利用属性窗口设置适当的属性,使Text1、Text2中数据右对齐;②请编写适当的程序完成以下功能:在Text1中输入40(度数)
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个名称check1的复选框数组(Index属性从0开始),含三个复选框,其标题分别为“语文”、“数学”、“体育”,利用属性窗口设
在考生的文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm。在窗体上有两个命令按钮,其名称分别为Command1和Command2,标题分别为“写文件”和“读文件”,如图3-131(a)所示。其中“写文件”命令按钮事件过程用来建立一个
在考生目录下有一个工程文件sjt5.vbp,其窗体如图1-83所示。考生目录下有一个in5.dat文件,文件中有5个运动员的姓名、7个裁判的打分和动作的难度系数。每人的数据占一行,顺序是:姓名、7个分数、难度系数。程序运行时,单击“输入”按钮,可把in5
在考生文件夹下有一个工程文件sjt5.vbp,其名称为Form1的窗体上已有三个文本框Text1、rext2、Text3,以及部分程序代码,请完成以下工作。①在属性窗口中修改Text3的适当属性,使其在运行时不显示,作为模拟的剪贴板使用,窗体如图
一棵二叉树共有25个结点,其中5个是叶子结点,则度为1的结点数为( )。
设有如下函数:FunctionDelSpace(chAsString)AsInteger Dimn%,st$,c$ st="" n=0 Fork=1ToLen(ch) c=Mid(ch,k,1) I
下面描述中,不属于软件危机表现的是( )。
设一棵满二叉树共有15个结点,则在该满二叉树中的叶子结点数为()。
随机试题
下列哪项是中毒性菌痢的特点
甾体皂苷元是由__个碳原子组成乙型强心苷元是由__个碳原子组成
某公司承担一项机电改建工程,工程量主要为新建4台5000m3原油罐及部分管线,更换2台重356t、高45m的反应器,反应器施工方法为分段吊装组焊。针对作业活动,项目部风险管理小组对风险进行了识别和评价,确定了火灾、触电、机械伤害、窒息或中毒、焊接、
【背景资料】某城市给水工程项目,总承包商将给水管道工程分包给具有相应资质能力的承包商。该分包商在施工中的一些情况如下:情况一:大型球墨铸铁管采用原土地基。情况二:球墨铸铁管接口采用人工推入式接口。情况三:承插式铸铁管接口材料使用的石棉必须是4F有
施工作业者提出水上水下施工作业申请时,提供的申请资料包括()。
(用户名:21;账套:202;操作日期:2013年1月1日)销售部销售联想电脑10台,收到北京公交公司支付购买款59000元,填记账凭证一张,凭证录入时间2013年1月10日。借:银行存款—工行存款59000
下列各项目,符合谨慎性原则的有()。
某市卷烟厂2009年10月发生下列业务:(1)从农民手中收购烟叶10吨,收购凭证上注明的收购额100000元,另支付价外补贴。验收后送某烟丝加工厂加工成烟丝,向运输公司支付运费800元,取得运输发票;(2)烟丝加工厂将上述10吨烟叶加工成8
下列IP也址中,()地址是B类地址。
下列关于综合布线的描述中,正确的是()。
最新回复
(
0
)