首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下程序: Private Sub Form_C1ick() Dim s As Long,f As Long Dim n As Integer,i As Integer f=1 n
设有如下程序: Private Sub Form_C1ick() Dim s As Long,f As Long Dim n As Integer,i As Integer f=1 n
admin
2013-01-23
48
问题
设有如下程序:
Private Sub Form_C1ick()
Dim s As Long,f As Long
Dim n As Integer,i As Integer
f=1
n=4
For i=1 To n
f=f*i
s=s+f
Next i
Print s
End Sub
程序运行后,单击窗体,输出结果是
选项
A、32
B、33
C、34 0)35
答案
B
解析
i=1时,f=f*i=1*1=1,s=s+f=0+1=1.i=2时,f=f*i=1*2=2,s=s+f=1+2=3,i=3时,f=f*i=2*3=6,s=s+f=3+6=9,i=4时,f=f*i=6*4=24,s=s+f=9+24=33,因此本题答案为B)。
转载请注明原文地址:https://www.kaotiyun.com/show/f0hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
程序段如下:DimiAsInteger,sAsIntegerFori=4To1Step-1s=s+iNextiPrints,i执行的结果是()。
阅读下面的程序:PrivateSubForm_Click()DimCheck,CounterCheck=TrueCounter=0DoDoWhile
窗体上有一个命令按钮Command1和一个列表框List1,其中List1有0、1、2、3、4的内容,有下列程序:PrivateSubCommand1_Click()Dimi,sFori=0ToList1.L
确定一个窗体或控件大小的属性是
在数据流图中,○(椭圆)代表
斐波那契(Fibonacci)数列的构成规律是:数列的第1、2个数是1,从第3个数起,每个数是其前面两个数之和。据此,下面有求斐波那契前12项值的过程,请完善程序。SubFibonacci(NAsInteger,s1)s1=0
当a=1、b=3、c=5、d=4时,执行下面一段程序后,x的值为______。Ifa<bThenIfc<dThenx=1ElseIfa<cThen
控件数组的名字由【】属性指定,而数组中的每个元素由【】属性指定。
对于一个二维数组A[1....m,1...n],若按列为主序存储,则任一元素A[i,j]的相对地址是【】。
结构化程序设计的基本原则不包括()。
随机试题
内含疏松结缔组织、脂肪和淋巴管,后者收纳乳房深部的淋巴()
Wesuspectthereisaquitedeliberateattempttosabotagetheelectionsandunderminetheelectoralcommission.
一项吸烟与肺癌死亡率关系的研究表明,吸烟者的肺癌死亡率为0.57‰,不吸烟的肺癌死亡率为0.07‰。根据题意计算求得其相对危险度为
患者,男,18岁。因反复发作腰背痛4个月,加重1月伴晨僵,来门诊看病。家族成员中无驼背患者。查体,骶髂关节压痛阳性,腰椎活动度检查Schober试验阴性,枕墙距为0,胸廓活动度可。根据检查结果,该患者诊断为
在某企业中随机抽取7名员工来了解该企业2019年上半年职工请假情况。这7名员工2019年上半年请假天数分别为:15310072这组数据的中位数是()。
A注册会计师负责审计甲公司2011年度财务报表。在考虑利用专家的T作时,A注册会计师遇到下列事项,请代为做出正确的专业判断。尽管A注册会计师在员工福利计划相关负债的计算方面不是专家,但在没有专家帮助的情况下,A注册会计师仍然可以充分了解这一领域以执行审
观察法可以分为()。
第二次世界大战全面爆发的标志性事件是()。
考虑具有如下性质的二叉树:除叶子结点外,每个结点的值都大于其左子树上的一切结点的值,并小于等于其右子树上的一切结点的值。现把9个数1,2,3,4…8,9填入图8-18所示的二叉树的9个结点中,并使之具有上述性质,此时N1的值是(1),N2的值是(2
在考生文件夹下,打开文档WORDI.DOCX,按照要求完成下列操作并以该文件名(WORD1.DOCX)保存文档。绍兴东湖东湖位于绍兴市东郊约3公里处,北靠104国道,西连城东新区,它以其秀美的湖光山色和奇兀实景而闻名,与杭州两湖、嘉兴南
最新回复
(
0
)