首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
求1 !+2 !+……+10 !的程序如下: Private Function s(x As Integer) f=1 For i=1 To x f=f*i
求1 !+2 !+……+10 !的程序如下: Private Function s(x As Integer) f=1 For i=1 To x f=f*i
admin
2019-06-11
39
问题
求1 !+2 !+……+10 !的程序如下:
Private Function s(x As Integer)
f=1
For i=1 To x
f=f*i
Next
s=f
End Function
Private Sub Command l_Click()
Dim i As Integer,y As Long
For i=1 To 10
( )
Next
Print y
End Sub
为实现功能要求,程序的括号中应该填入的内容是
选项
A、Call s(i)
B、Call s
C、y=y+s(i)
D、y=y+s
答案
C
解析
函数过程有一个返回值,一般出现在表达式中组成表达式的一部分。本题的题目要求累加各个数的阶乘,而函数s的作用是求参数的阶乘,因此应该在每次循环中累加f函数的值,参数为循环变量i。
转载请注明原文地址:https://kaotiyun.com/show/wxUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下程序段:()。a$=”BeijingShanghai”b$=Mid(a$,InStr(a$,”g”)+1)执行该程序段后,变量b$的值为
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码:DimSaveAllAsStringPrivateSubForm_Load()
在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写如下程序:PrivateSubfune(LAsLabel)L.Caption=”1234”EndSubPr
下列说法中正确的是()。
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertStr=""strL=Lea(xStr)
执行下面程序段的输出是()。Print1,2;Print3Print4:5
下列语句中,不能用于定义数组的关键字是()。
阅读程序:PrivateSubForm_Click()X=50Fori=1To4Y=InputBox("请输入一个整数")y=Val(y)IfvMod5=0Thena=
(1)在考生文件夹下有一个工程文件sjt3.vbp。窗体上有名称为Timer1的定时器,以及两条水平直线,名称分别为Line1和Linc2。请用名称为Shapel的形状控件,在两条直线之间画个宽和高都相等的形状,设置其形状为圆,并设置适当属性使其
考生文件夹下有一个数据库文件“samp2.accdb”,其中存在已经设计好的3个关联表对象“tStud”、“tCourse”和“tScore”及表对象“tTemp”。请按以下要求完成设计。(1)创建一个查询,查找并显示学生的“姓名”、“课程名”和
随机试题
对大咯血窒息病人进行急救时,应采取的体位是()
某变电所设有两台强油风冷240MVA,220±2.5/121/35kV变压器,220kV、110kV、35kV母线均为单母线分段接线,设两台35/0.4kV所用变压器分接于35kV两端母线,当初期该变电所只有一台主变压器时,下列所用电源的配置方式中哪些是不
许多国家在公司法或者其他法律中对股份公司红利的支付条件明确加以规定,其一般原则是( )。
企业发行股票,支付给券商的费用应视情况记入以下科目();
A公司将应收账款出售给工商银行。该应收账款的账面余额为150万元,已计提坏账准备5万元,售价为120万元,双方协议规定不附追索权。A公司根据以往经验,预计与该应收账款的商品将发生部分销售退回17.55万元(货款15万元,增值税销项税额为2.55万元),实际
下列各项中,符合印花税有关规定的有()。
下列选项中,对现代教学媒体的主要特点描述不正确的是()。
[*]下列关于2009年图中各省市普通高中情况的描述,与资料相符的是()。
简述知识的分类。
一位在政府职能部门多年从事管理工作的中年管理者新近刚被任命为某研究所的所长。面对陌生的学科专业的研究人员,该所长感到有点无从下手。如果要就他如何有效地开展新工作提出原则性建议,你的首选是______。
最新回复
(
0
)