首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
以下数列:1,1,2,3,5,8,13,21…… 的规律是从第3个数开始,每个数都是其前面两个数之和。 在考生文件夹下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图所示。请编写适当的事件过程完成如下功能:选中一个单选按钮后,单击“计
以下数列:1,1,2,3,5,8,13,21…… 的规律是从第3个数开始,每个数都是其前面两个数之和。 在考生文件夹下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图所示。请编写适当的事件过程完成如下功能:选中一个单选按钮后,单击“计
admin
2020-04-08
81
问题
以下数列:1,1,2,3,5,8,13,21……
的规律是从第3个数开始,每个数都是其前面两个数之和。
在考生文件夹下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图所示。请编写适当的事件过程完成如下功能:选中一个单选按钮后,单击“计算”按钮,则计算出上述数列第n项的值,并在文本框中显示,n是选中的单选按钮后面的数值(提示:因计算结果较大,应使用长整型变量)。
注意:不能修改已经给出的程序和已有的控件的属性;在结束程序运行之前,必须选中一个单选按钮,并单击“计算”按钮以获得一个结果;必须使用窗体右上角的关闭按钮结束程序,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考答案 PriVate Sub Commandl_Click() Dim a()As Long Dim i As Integer Dim n As In七eger ′Opl.Count是单选按钮数目,这里用的是控件数组 F0r i=0 T0 Opl.Count-1 ′判断哪一项被选择,把它后面的数值赋给n,确定n值 If Opl(i).Value=True Then n=Val(Opl(i).Caption) Exit For End If Next ReDim a(n)′重新申请空间.这里是动态申请 a(1) =1 a(2)=1′数列第一项、第二项值确定 F0r i=3 To n a(i)=a(i-1)+a(i-2)’后一项值是前两项值之和 Next Textl.Text=a(n) End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 【易错提示】在定义数组a的时候,要注意定义为长整型Long,可以防止溢出;单选按钮数组的In—dex属性分别为0,1,2,在编写循环语句的时候要注意循环变量Opl.Count-1。
解析
单选按钮数组常用于提供唯一选择,Value属性值决定每个单选按钮的选中状态:False为未选中,True为选中,Caption属性用于设置单选按钮的标题。本题在For循环语句(循环变量k的初值为0,终值应为3)中逐一检查每个单选按钮是否被选中,用变量n记录选中单选按钮的索引号。然后取消对当前选中单选按钮的选择,使单选按钮数组中的下一个按钮被选中。如果当前已经选中最后一个单选按钮,则将n赋值为0,重新从单选按钮数组的第一个元素开始。
转载请注明原文地址:https://kaotiyun.com/show/LATp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有人在属性窗口中通过设置Picture属性为命令按钮装入了图片,但没有显示,其原因是
以下关于窗体的叙述中错误的是( )。
以下能够设置控件焦点的方法是( )。
设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是()。
已知文本框的ScrollBars属性设置为3,却看不到任何效果,原因是()。
(1)考生文件夹中有工程文件sjt3.vbp。窗体上有一个名称为Label1、标题为“标签控件”的标签;有一个名称为Command1、标题为“命令按钮”的命令按钮。单击上述两控件中的任一控件,则在标签Label2中显示所单击控件的标题内容(标题内容前添加“
如果将命令按钮的访问键设置为"D",以下不会触发命令按钮Click事件的操作是
设工程文件中包名称分别为Form1、Form2的两个窗体,且Form1的菜单属性设置如下:窗体Form1中的程序如下:DimFlagAsBooleanPrivateSubForm_Load() Flag=TrueEndSubPr
随机试题
行政信息公开化的作用有哪些?
以下关于项目基地通道出口位置的描述哪一项是错误的()。
H.S编码的品目号由四位数字组成,子目号由六位数字组成。( )
某日化用品企业采用加大牙膏管口径的方式增加使用量,以此达到增加牙膏销售量的目的,这种战略属于()。
________,浅草才能没马蹄。(自居易《钱塘湖春行》)
行政主体向违反行政法规规定的相对方收取排污费的行政行为,在性质上属于:
下列关于我国现今法律渊源的说法,正确的是
追诉时效的起算时间为()
下列有关拷贝构造函数的描述中错误的是()。
Everymeans______triedoutbutnooneworks.Ihaverunoutofmypatience.
最新回复
(
0
)