首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
现有如下程序: Private Sub Command1_Click() s=0 For i=1 To 5 s=s+f(5+i) Next Print s End Sub Public Function f(x As Integer
现有如下程序: Private Sub Command1_Click() s=0 For i=1 To 5 s=s+f(5+i) Next Print s End Sub Public Function f(x As Integer
admin
2015-08-28
54
问题
现有如下程序:
Private Sub Command1_Click()
s=0
For i=1 To 5
s=s+f(5+i)
Next
Print s
End Sub
Public Function f(x As Integer)
If x>=10 Then
t=x+1
Else
t=x+2
End If
f=t
End Function
运行程序,则窗体上显示的是( )。
选项
A、38
B、49
C、61
D、70
答案
B
解析
程序中过程f的功能是参数值大于等于10时,返回参数加1的值,否则返回参数加2的值。因此按钮事件中s值的计算过程如下:
i=1时,s=0+f(5+1)=8;
i=2时,s=8+f(5+2)=8+9=17;
i=3时,s=17+f(5+3)=17+10=27;
i=4时,s=27+f(5+4)=27+11=38;
i=5时,s=38+f(5+5)=38+11=49;
因此最终在窗体上输出的是49。
转载请注明原文地址:https://kaotiyun.com/show/z6Lp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序段的执行结果为______。DimA(10),B(5)Fori=1To10A(i)=iNextiForj=1To5B(j)=j*20
VisualBasic根据计算机访问文件的方式将文件分成3类,其中不包括()。
下列控件属性中,属性值的类型不相同的一项是()。
下列程序的输出图形是()。Fork=0To360cr=Int(160*Rnd)ang=-3.1415926/180*kCircle(2000,2000),500,cr,0,angNext
下列叙述正确的是()。
建立一个通讯录的随机文件phonBook.txt,内容包括姓名、电话、地址和邮编,用文本框输入数据。单击“添加主记录”按钮command1时,将文本框数据写入文件,单击“显示”按钮Command2时,将文件中所有记录内容显示在立即窗口。PrivateT
按照“先进先出”组织数据的数据结构是()。
软件维护活动包括以下几类:改正性维护、适应性维护、【】维护和预防性维护。
设有如下记录类型:TypestudentNumberAsString*10NameAsString*8EndType窗体中有若干控件,单击其中的一个按钮Command1时,执行如下事件过程,该过程的功能是把数据输出到指定的文件中。根据
分布式数据库系统不具有的特点是______。
随机试题
当分析不同浓度水平的质控品时,可制作单个质控图来显示所有质控测定值的“Z-分数”。如果平均值为5.2,标准差为0.4的控制物的测定值为5.6,则Z-分数为
A.直接作用受体B.影响递质的储存C.影响递质的代谢D.影响递质的释放E.影响递质的生物合成毛果芸香碱的作用是
【2003年第28题】确定图3—263中所示结构的超静定次数:
不属于《安全生产法》调整范围的是()。
罗森塔尔关于教师的预期的实验表明().
某大湖是重要的候鸟越冬场所。近年来,该湖出现枯水期提前、枯水期持续时间延长等问题,枯水期水位过低,鱼类减少,影响了越冬的鸟类进食。有专家建议,应该在湖的入江水道处修建水闸,通过控制枯水期水位,增加湖区鱼类的生活空间,保护越冬的候鸟。以下哪项如果为真,将最有
下列各组中全是偏正型的是()。
设有以下命题:①若正项级数μn收敛,则μn2收敛;②若<1,则μn收敛;③若(μ2n-1,μ2n)收敛,则μn收敛;④若μn收敛,(-1)nμn发散,则μ2n发散.则以上命题正确的是().
IappreciateyouverymuchfordroppingbyourboothattheExhibitionlastmonth.Asyoumighthave(141)noticed,ourcompany
•Readthearticlebelowaboutpeoplewhobuyclothesasaninvestment.•Foreachquestion(31-40),writeonewordinCAPITALL
最新回复
(
0
)