首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Private Sub Command1_Click() Dim a As Integer a=2 s=0 For i=1 To 3 s=s+Fun(a) Next i Print s E
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Private Sub Command1_Click() Dim a As Integer a=2 s=0 For i=1 To 3 s=s+Fun(a) Next i Print s E
admin
2019-03-14
34
问题
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
Private Sub Command1_Click()
Dim a As Integer
a=2
s=0
For i=1 To 3
s=s+Fun(a)
Next i
Print s
End Sub
Function Fun(a As Integer)
Static c
b=0
b=b+1
C=c+1
Fun=a+b+C
End Function
程序运行后,单击命令按钮,输出结果是( )。
选项
A、6
B、9
C、11
D、15
答案
D
解析
Function过程和Sub过程有一个很重要的区别,Function过程可以带返回值,而Sub过程不可以。本题的Command1_Click()过程中,使用For循环结构调用函数过程Fun,并将Fun带回的计算结果进行累加,Command1_Click()事件过程中For循环共执行3次,循环执行情况及各变量的值如下表所示。
本题中Fun函数过程中定义的变量c是静态局部变量,可以保留上次程序执行后的结果,最后输出变量s的值为15,所以D选项正确。
转载请注明原文地址:https://www.kaotiyun.com/show/UBUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有2个名称分别为Text1和Text2的文本框。编写如下程序:PrivateSubForm_Load0PrivateSubCommand1Click()Textl.Text=”PrintTextl.Text+Text2.Text
下面关于控件数组的叙述中正确的是
以下关于控件数组的叙述中,正确的是
窗体上有一个名称为Commandl的命令按钮,其单击事件过程如下:OptionBase1PrivateSubCommand1_Cliek()Dima(4,4)AsIntegerFori=1To4Forj=1To4
下列工具中,不属于结构化分析的常用工具的是()。
下面程序的输出结果是()。PrivateSubCommandl_Click()ch$=“ABCDEF”procehPrintchEndSubPrivateSubproc(chAsString)S=""Fork=
能够将组合框Combol中最后一个数据项删除的语句为
设:a=12,b=5,c=7,表达式x=(a\c+aModb)+Int(13/5)的值是
在深度为7的满二叉树中,叶子结点的个数为
从键盘上输入一个浮点数asingle,利用字符串函数对该数进行处理后,如果输出的内容不是“非浮点数”,则对程序输出的内容分析正确的是()。asingle=InputBox("请输入一个浮点数:")str1$=Str$(asing
随机试题
Therearemanycommonlyheldbeliefsabouteyeglassesandeyesightthatarenotprovenfacts.Forinstance,somepeoplebelieve
下列不能多进食含碘丰富的食物的人群为
某年,甲、乙两人群中,几种特殊部位的肿瘤新报告病例的构成比如下表:据此推论甲人群较乙人群更易患肺癌、乳腺癌和子宫颈癌。该推论()
对于深厚软土地区,超高层建筑桩基础宜采用以下哪几种桩型?
认证机构进场审查的主要目的是( )。
在出口业务中,国外客户往往要我国出口商提供GSPFormA产地证。在我国,这种证书的签发机构是()。
某管教中队有150名轻犯,领导决定近期组织犯人外出参观建军94周年成就展。以此来教育感化犯人,请你为领导拟一份组织参观的具体计划。
设窗体名称为frm1。以下叙述中正确的是( )。
Whatisthemostfundamentaldifferencebetweenplantsandanimals?
Itisverydifficulttosayjustwhencolonizationbegan.ThefirsthundredyearsafterChristopherColumbus’sjourneyofdiscov
最新回复
(
0
)