首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
数列1,1,3,5,9,15,25,41,…,的规律是从第三个数开始,每个数是它前面两个数的和加1。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图3—192所示。请编写适当的事件过程实现以下功能:在Text1中输入整数40,单击
数列1,1,3,5,9,15,25,41,…,的规律是从第三个数开始,每个数是它前面两个数的和加1。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图3—192所示。请编写适当的事件过程实现以下功能:在Text1中输入整数40,单击
admin
2019-05-14
75
问题
数列1,1,3,5,9,15,25,41,…,的规律是从第三个数开始,每个数是它前面两个数的和加1。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图3—192所示。请编写适当的事件过程实现以下功能:在Text1中输入整数40,单击“计算”按钮,则在Text2中显示该数列第40项的值。如果单击“存盘”按钮,则将计算的第40项的值存到考生目录下的out5.txt文件中。 (提示:因数据较大,应使用Long型变量。)
注意:在结束程序运行之前,必须单击“存盘”按钮,把结果存入out5.txt文件,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件夹下的工程文件sjt5.vbp。 步骤2:编写“计算”按钮的单击事件过程。参考代码: Private Sub Command1_Click() Dim f As Long a(1)=1:a(2)=1 For i=3 To Val(Text1.Text) f=a(i-2)+a(i-1)+1 a(i)=f Next Text2.Text=f End Sub 步骤3:运行程序,在文本框中输入40,并单击“计算”按钮获得一个结果,然后单击“存盘”按钮保存计算结果。 步骤4:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/JUUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下能正确定义数据类型Systemlnfo的代码是()。
在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框,其名称分别为Drivel、Dirl和Filel,为了使它们同步操作,必须触发驱动器的Change事件和目录的Change事件,在这两个事件中执行的语句分别为()。
在窗体(Name属性为Form1)上画两个文本框(Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下两个事件过程()。PrivateSubCommandl__Click()
设计窗体时双击窗体的任何位置,将打开()。
在数据库设计中,将E-R图转换成关系数据模型的过程属于()。
关于MDI窗体下列说法正确的是()。
在窗体上用复制、粘贴的方法建立了一个命令按钮数组,数组名为ComTestl。设窗体Forml标题为“MyForml”,双击控件数组中的第3个按钮,打开代码编辑器,编写如下代码:PrivaeSubComTestl——Click(Index
设在工程中有一个标准模块,并定义了如下类型:TypeStutypeinoAsIntegerstmameAsString*20strsexAsString*2smarkAsSingle
数列1,1,2,3,5,8,13,21,…的规律是从第三个数开始,每个数是它前面两个数之和。在考生目录下有一个工程文件sit5.vbp。窗体中已经给出了所有控件,如图3—87所示。请编写适当的事件过程实现以下功能:在Text1中输入整数40,单击“计算”按
随机试题
下列关于欧洲联盟的表述中,不正确的是()。
审美教育
梁的横截面为图示薄壁工字型,z轴为截面中性轴。设截面上的剪力竖直向下,该截面上的最大弯曲切应力在()。
在深圳证券交易所,公司债券的大宗交易、专项资金管理计划协议交易,协议平台的成交确认时间为每个交易日的9:15~11:30和()。
证券公司经营融资融券业务,应以自己的名义,在证券登记结算机构分别开立()。Ⅰ.融券专用证券账户Ⅱ.信用交易证券交收账户Ⅲ.信用交易资金交收账户Ⅳ.客户信用交易担保证券账户
I’dliketotakethisopportunitytoextendmyheart-feltgratitudetothehost.
设A=(A<0),且AX=0有非零解,则A*X=0的通解为______.
当x>0时,f(lnx)=,则∫-22xf’(x)dx为().
ThereisalwaysexcitementattheOlympicGameswhenanathlete(breaks)arecord.
A、Thewomanwillhavelunchwiththemantomorrow.B、Thewomanisonadietrecently.C、Thewomandeclinestheoffer.D、Thewoma
最新回复
(
0
)