首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下事件过程: Private Sub Form_Click() Dim f1 As Integer, f2 As Integer, i As Integer Dim s As Integer f1 = 1: f2 = 1 s = f1
设有如下事件过程: Private Sub Form_Click() Dim f1 As Integer, f2 As Integer, i As Integer Dim s As Integer f1 = 1: f2 = 1 s = f1
admin
2015-06-30
26
问题
设有如下事件过程:
Private Sub Form_Click()
Dim f1 As Integer, f2 As Integer, i As Integer
Dim s As Integer
f1 = 1: f2 = 1
s = f1 + f2
For i = 1 To 3
f1 = f1 + f2
f2 = f2 + f1
s = s + f1 + f2
Next i
Print s
End Sub
运行程序,单击窗体,则输出结果为
选项
A、2
B、20
C、54
D、52
答案
C
解析
程序开始执行时,f1=1,f2=1,s=f1+f2=2。For循环变量i的取值从1到3,当i=1时,f1=f1+f2=2,f2=f2+f1=1+2=3,s=s+f1+f2=2+2+3=7;当i=2时,f1=f1+f2=2+3=5,f2=f2+f1=3+5=8,s=s+f1+f2=7+5+8=20;当i=3时,f1=f1+f2=5+8=13,f2=f2+f1=8+13=21,s=s+f1+f2=20+13+21=54;故本题正确答案为C。
转载请注明原文地址:https://kaotiyun.com/show/z8Qp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体中添加一命令按钮,并在命令按钮中编写如下代码:PrivateSubCommandl_C1ick()DimaAsSinglea=-1.234567b=Int(A)c=Sgn(A)d=Abs(A)e=Fix(A)
Label控件中内容能垂直方向变化而宽度保持不变则应设置______属性。
执行以下程序段后,变量c$的值为a$="VisualBasicPrograming"0b$="Quick"c$=b$&UCase(Mid$(a$,7,6))&Right$(aS,11)
假定有如下程序代码,程序运行后,把鼠标光标移到窗体内,每单击一次,变换一种鼠标光标的形状,依次显示鼠标光标的15个属性。请在划线处将程序补充完整。PrivateSubForm_Click()StaticxAsInteger
VB中的控件分为内部控件、ActiveX控件和【】三类。
表达式5Mod3+3\5*2的值是
有下列二叉树,对此二叉树前序遍历的结果为()。
系统符号常量的定义可以通过______获得。
一个项目具有一个项目主管,一个项目主管可管理多个项目,则实体“项目主管”与实体“项目”的联系属于【】的联系。
随机试题
A.1日B.3日C.1周D.2周E.6周扣年女性急性肾盂肾炎抗生素治疗的疗程一般为
自身力量不足,需要外力协助,尤其在启动时需要帮助的骨折患者,应采取的功能锻炼方法为()
因债务人无偿转移财产,对债权人造成损害,债权人可行使的撤销权是指()。
当期货交易所总经理因故临时不能履行职权时,由()代其履行职权。[2015年5月真题]
股份有限公司公开发行公司债券对公司净资产的要求是()。
甲企业在计算2006年度企业所得税应纳税所得额时,对“存货跌价准备”在税前进行了扣除。但乙税务机关认为,甲企业100万元的“存货跌价准备”不得在税前扣除,并作出了补缴企业所得税33万元的决定。甲企业不服,拒绝补缴税款,向丙税务机关申请税务行政复议,丙税务机
某发明专利申请于2015年11月20日获得公告授权,专利权人为甲。针对该专利权,乙于2016年5月20日向专利复审委员会提出无效宣告请求,甲随后删除了部分权利要求。专利复审委员会于2016年11月20日作出审查决定,宣告修改后的权利要求维持有效。2017年
以下投资业绩评估指标中,用以测算每单位非系统风险所带来的非常规收益的是()。
Java线程组把一个线程看做一个【】进行同一处理。
Alatesurgeinuniversityapplicationsisputtingextrapressureonsixth-formerstoachievetopgradesintheirexams.F
最新回复
(
0
)