首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command 1 Click() Dim m As Integer,n As Integex n=2 For m=1 To 3
编写如下程序: Private Sub Command 1 Click() Dim m As Integer,n As Integex n=2 For m=1 To 3
admin
2018-10-18
73
问题
编写如下程序:
Private Sub Command 1 Click()
Dim m As Integer,n As Integex
n=2
For m=1 To 3
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
程序运行后,单击命令按钮Commandl,输出结果为
选项
A、3 3 3
B、3 4 5
C、3 5 6
D、1 2 3
答案
B
解析
使用Dim关键字定义的是动态局部变量,过程执行结束后即被释放;使用Static关键字定义的是静态局部变量,过程执行结束后仍然保留。本题中函数proc中的局部变量a是动态变量,是静态变量。即每次函数调用后b的值会保留。先后三次调用proc(n)方法,依次输出3、4、5。
转载请注明原文地址:https://kaotiyun.com/show/IXFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
面向对象方法中,继承是指( )。
以下关于数组的叙述中,错误的是()。
有如下程序:PrivateSubForm_Click()DimsAsInteger,pAsIntegerp=1Fori=1To4Forj=1Tois=S+
一棵二叉树中共有80个叶子节点与70个度为1的节点,则该二叉树中的总节点数为()。
算法的空间复杂度是指( )。
一棵二叉树中共有80个叶子结点与70个度为1的结点,则该二叉树中的总结点数为
窗体上有一个名称为Command1的命令按钮,其事件过程如下:PrivateSubCommand1_Click() x="VisualBasicProgramming" a=Right(x,11) b=Mid(x,7,5) c=
A、DYBEAFCZXB、YDEBFZXCAC、ABDYECFXZD、ABCDEFXYZC前序遍历是指在访问根结点、遍历左子树与遍历右子树这三者中,首先访问根结点,然后遍历左子树,最后遍历右子树;并且,在遍历左右子树时,仍然先访问根结点,然后遍历左
设程序中有以下语句:MsgBox"Visual",,"Basic","等级考试",2执行该语句后,显示一个信息框,以下关于该信息框的叙述中,正确的是
设栈的顺序存储空间为S(1:m),初始状态为top=m+1。现经过一系列入栈与退栈运算后,top=20,则当前栈中的元素个数为
随机试题
商业银行在识别和分析集团法人客户信用风险的过程中,应当()。
下列事件最合理的发生顺序为:(1)巴蜀中人(2)感冒咳嗽(3)喜好麻辣(4)寒潮来袭(5)忌辛忌辣
建设社会主义核心价值体系是构建和谐社会、建设和谐文化的必然要求,是党在哪方面的一次重大理论创新?()
山水田园诗:这类诗以描写自然风光、农村景物以及安逸恬淡的隐居生活见长。诗境隽永优美,风格恬静淡雅,语言清丽洗练,多用白描手法。根据上述定义,以下各项属于山水田园诗的是()。
无论贫民还是达官,身后能与清风明月相伴,听任潮涨潮落,不论春夏秋冬,这是最好不过的事。遗憾的是,历朝历代总有_______之徒,干掘墓鞭尸之事;总有_______之辈,干挖坟盗宝营生。填入横线处最恰当的一项是()。
把下面的六个图形分为两类,使每一类图形都有各自的共同特征或规律,分类正确的一项是:
2022年6月16日出版的第12期《求是》杂志发表习近平的重要文章《坚定不移走中国人权发展道路,更好推动我国人权事业发展》。文章强调,党的百年奋斗史,贯穿着党团结带领人民为()而进行的不懈努力。
向量β=(1,—2,4)T在基α1=(1,2,4)T,α2=(1,—1,1)T,α3=(1,3,9)T下的坐标是_______。
ElegyWritteninaCountryChurchyardisapoemwrittenby______.
A、Thebenefitsofstrongbusinesscompetition.B、Aproposaltolowerthecostofproduction.C、Complaintsabouttheexpenseofm
最新回复
(
0
)