首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim m As Integer,n As Integer n=2 For m=1To3 Print proc(n); Next m End Sub Function proc(i
编写如下程序: Private Sub Command1_Click() Dim m As Integer,n As Integer n=2 For m=1To3 Print proc(n); Next m End Sub Function proc(i
admin
2020-04-18
46
问题
编写如下程序:
Private Sub Command1_Click()
Dim m As Integer,n As Integer
n=2
For m=1To3
Print proc(n);
Next m
End Sub
Function proc(i As Integer)
Dim a As Integer,Static b As Integer
a=a+1:b=b+1
proc=a*b+i
End Function
程序运行后,单击命令按钮Command1,输出结果为
选项
A、3 3 3
B、3 4 5
C、3 5 6
D、1 2 3
答案
B
解析
使用Dim关键字定义的是动态局部变量,过程执行结束后即被释放;使用Static关键字定义的是静态局部变量,过程执行结束后仍然保留。本题中函数proc中的局部变量a是动态变量,b是静态变量。即每次函数调用后b的值会保留。先后三次调用proc(n)方法,依次输出3、4、5。
转载请注明原文地址:https://kaotiyun.com/show/brTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,并编写如下程序:PrivateTypeRecord IDAsInteger NameAsString*20EndTypePrivateSubCommand1_Click()
设计窗体时双击窗体的任何位置,将打开()。
设窗体上有名称为Option1的单选按钮,且程序中有语句:IfOption1.Value=TrueThen下面语句中与该语句不等价的是( )。
在考生目录下有一个工程文件sjt3.vbp,包含了所有控件和部分程序。程序运行时,在文本框中每输入一个字符,则立即判断:若是小写字母,则把它的大写形式显示在标签Labell中;若是大写字母,则把它的小写形式显示在Labell中;若是其他字符,则把该字符直接
有如下的一个函数过程:Functionfn(ByValnumAsLong)DimkAsLongk=1:mlm=Abs(num)DoWhilehumk=k*(numMod10)nuln=num|10Loopfn=kEn
下面不能作为结构化方法软件需求分析工具的是
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:OptionBase1PrivateSubCommand1_Click()Dimaa=Array(1,2,3,4):j=1
在面向对象方法中,不属于“对象”基本特点的是()。
软件需求分析阶段的工作,可以分为四个方面:需求获取、编写需求规格说明书、需求评审和()。
要建立一个随机文件记录学生的信息,如下定义的学生记录类型,由学号、姓名和5门课程成绩(百分制)组成,下列的定义正确的是()。
随机试题
排水铸铁管的壁厚为()。
关于用肾上腺糖皮质激素治疗迟发性哮喘的机制,下列哪项不正确
白陶土样便提示便后滴下或射出鲜红色血液,与粪便不相混杂者,可见于
胎儿呼吸窘迫综合征的患儿血浆中浓度明显降低的是
罗威纳犬,雌性,2岁,36kg,激烈训练后,突然出现精神沉郁,呆立,弓腰,干呕,呻吟,口吐白沫,卧地不起,呼吸急促,可视黏膜苍白,腹围迅速增大,腹部叩诊呈鼓音。确诊该病的首选检查方法是()
甲于某晚9时驾驶货车在县城主干道超车时,逆行进入对向车道,撞上乙驾驶的小轿车,乙被卡在车内无法动弹,乙车内黄某当场死亡、胡某受重伤。后查明,乙无驾驶资格,事发时略有超速,且未采取有效制动措施。(事实一)甲驾车逃逸。急救人员5分钟后赶到现场,胡某因
王老师在《木刻版画》一课的印制教学环节中,演示了调墨、滚墨印制等方法。这种教学方法属于()。
教师的礼仪特点具有()。
包容性增长即为倡导机会平等的增长,最基本的含义是公平合理地分享经济增长。它涉及平等与公平的问题,寻求的是社会和经济的协调发展及可持续发展,与单纯追求经济增长相对立。根据上述定义,下列哪项不涉及包容性增长?
OnFoodSafetyIssues1.食品安全的现状2.造成食品安全问题的原因3.我们应该如何应对
最新回复
(
0
)