首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
现有如下程序: 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-10-23
67
问题
现有如下程序:
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://www.kaotiyun.com/show/3WLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在深度为5的满二叉树中,叶子结点的个数为
将控件添加到工具箱中,应先在工具箱的空白处单击右键,在弹出的快捷菜单中选择______选项,然后在弹出的对框中选择所需的控件。
将调试通过的工程经“文件”菜单中的“生成exe文件”编译成为exe文件后,该可执行文件到其他机器上不能运行的主要原因是()。
执行如下语句:a=InputBox("Today","Tomorrow","Yesterday","Daybeforeyesterday",5)将显示一个输入对话框,在对话框的输入区中显的信息是()。
只能用来显示字符信息的控件是
下面对语句的功能说明中错误的是Open"Text.Dat"ForOutputAs#FreeFile
下面程序运行后的结果是()。PrivateSubForm_Click()DimsAsInteger,kAsInteger,iAsInteger,nAsIntegers=1
在VisualBasic的立即窗口内输入以下语句X=97?Chr$(X)在窗口中显示的结果是【】。
假定在工程文件中有一个标准模块,其中定义了如下记录类型:TypeBooksNameAsString*10TelNumAsString*20EndType要求在执行事件过程Command1_Click时,在顺序文件Person.txt中
表达式14/5*2的值是______。
随机试题
慢性风湿性瓣膜病常见的联合瓣膜病变是
票据丧失的补救措施不包括()。
国家授权投资的机构投资设立的国有独资公司可以设立股东会,也可以不设立股东会。( )
入住时限是指()所规定业主办理入住手续的时间期限。
美育
下列选项中,表述错误的是()。
某小区有80位老人,其中喜欢下象棋的有73人,喜欢打羽毛球的有67人,喜欢打太极拳的有52人。则以上三项业余爱好都喜欢的至少有多少人?()
1.输入下列文字,并设定左缩进2厘米,字间距离为加宽两磅,并以WD5.DOC为文件名保存。在即将来临的信息时代,知识很可能将成为公司最宝贵的财产——用以获取这种知识的“企业情报”工具可能将证明对建立和保持竞争优势具有举足轻重的作用。将上面
Somepeoplesaylovemakestheworldgoaround.Otherssayitisnotlove:it’smoney.Sincethetruthisthatitisenergythat
A、Torunintoeachother.B、Togetbargains.C、Toavoidthecrowds.D、Tojointhecrowds.C
最新回复
(
0
)