首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下列程序的功能是:当发生窗体的单击事件后,将在窗体上显示“1!+2!+3!+…+10!”的和。 Private Sub Form_Click() Dim s As Long,i As Integer s=0 For i=1
下列程序的功能是:当发生窗体的单击事件后,将在窗体上显示“1!+2!+3!+…+10!”的和。 Private Sub Form_Click() Dim s As Long,i As Integer s=0 For i=1
admin
2009-02-13
33
问题
下列程序的功能是:当发生窗体的单击事件后,将在窗体上显示“1!+2!+3!+…+10!”的和。
Private Sub Form_Click()
Dim s As Long,i As Integer
s=0
For i=1 To 10
s=s+【 】
Next i
Print s
End Sub
Private Function fact(ByVal n As Integer)As Long
Dim i As Integer,f As Long
f=1
For i=2 To n
f=f*i
Next i
【 】
End Function
选项
答案
fact(i) , fact=f
解析
本题的函数过程fact的作用是求参数n的阶乘。函数中通过一个For循环把从2乘到n的值放在变量f中,f就是n的阶乘。n的阶乘应该作为函数值返回,VB规定,要想函数过程返回一个值,可把这个值直接赋给函数名。所以[12]处应填“fact=f”。在Form_Click事件中,通过一个For循环把1到10的阶乘加到变量s中,因此在该循环中应该调用Fact函数过程得到循环变量i的阶乘,故[11]处应填“fact(i)”。
转载请注明原文地址:https://kaotiyun.com/show/An1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设a=8,则表达式少>>>1的值是
耦合和内聚是评价模块独立性的两个主要标准,其中______反映了模块内各成分之间的联系。
抛出异常、生成异常对象都通过下列哪个语句实现?()
Java是区分大小写的。源文件名与程序类名必须相同,其扩展名为______,源文件中最多只能有一个______类,其他类的个数不限。
下列语句:a=10011101;b=10111001;a&b结果为()。
下列()选项是main()方法的返回值类型。
执行完语句int[]x=newint[25];后,则下列哪个说法是正确的?()
如果任何包中的子类都能访问超类中的成员,那么应使用哪个限定词?()
阅读下面实现堆栈类并发控制的部分代码publicclassDataStack{privateintidx=0;privateint[]data=newint[
随机试题
诊断首先考虑试用铁剂治疗几周后,网织红细胞不升高,应考虑诊断是否有误
中国共产党对生态文明建设的认识经历了一个发展过程,第一次正式把生态文明这个概念写进党的代表大会报告的中国共产党代表大会是
一般来说,供给不变,当需求增加时,将引起()。
事故经过2013年8月28日9时16分,某在建工程6号楼西侧单元、东侧阳台下方地面突然起火,火势呈“V”字形迅速向上蔓延(工地监控摄像记录)。此时,6号楼外墙过火范围内共有5个吊篮。其中,2个吊篮位于第15层,2个吊篮位于第19层,一个吊篮位于第
某县国税局接到群众举报,县属某工贸公司有进货不入账,企图逃税的行为,经查证责令该公司在5日内缴纳税款。第2天该公司不但未去缴税,反而将账户上的资金转走,税务局得到消息后,便责令该公司提供纳税担保。该公司到县政府找到主管部门,主管部门向国税局做了口头纳税保证
Outline:Thefirstingredientofsuccessisdiligence.Thesecondingredientofsuccessisdevotion.Thethirdingredientofsuc
Internationalfreetradeoccurswhentherearenobarrierstotrade.Countriescangetalotofbenefitsfromfreetrade.(31),
IcouldhavedoneitbetterifI______moretime.
1.面对今年的就业形势,很多大学生毕业后选择到农村去发展,比如去农村当“村官”。2.你认为到农村就业对大学生来说是好的就业选择吗?请说明理由。
HowShouldYouBuildUpYourVocabularyExactlywhatdoyoudoduringanormalday?Howdoyouspendyourtime?PaulT.Rank
最新回复
(
0
)