首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command 1_Click() Function proc(i As Integer) Dim m As Integer,n As Integer Dim a As I
编写如下程序: Private Sub Command 1_Click() Function proc(i As Integer) Dim m As Integer,n As Integer Dim a As I
admin
2015-05-29
45
问题
编写如下程序:
Private Sub Command 1_Click() Function proc(i As Integer)
Dim m As Integer,n As Integer Dim a As Integer,Static b As Integer
n=2 a=a+1:b=b+1
For m=1 To 3 proc=a*b+i
Print proc(n); End Function
Next m
End Sub
程序运行后,单击命令按钮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/1DQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下能正确定义数据类型TelBook的代码是______。
阅读程序:OptionBase1Dimarr()AsIntegerPrivateSubFormClick()DimiAsInteger,iAsIntegerReDimarr(3,2
有如下程序:PrivateSubFormClick()DimCheck,CounterCheck=TrueCounter=0DoDoWhileCounter<20
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Form1中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger,则以下叙述中正确的是
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:PrivateSubForm_Load()ShowText1.Text=""Text2.Text="’’Text1.S
执行如下语句:a=InputBox("Today","Tomorrow","Yesterday",,,"Daybeforeyesterday",5)将显示一个对话框,在对话框的输入区中显示的信息是
执行语句s=Len(Mid("VisualBasic",1,6))后,s的值是
设有如下程序段:a$="BeijingShanghai"b$=Mid(a$,InStr(a$,"g")+1)执行上面的程序段后,变量b$的值为______。
假定有一个菜单项,名为MenuItem,为了在运行时使该菜单项不可见,应使用的语句为()。
下列控件属性中,属性值的类型不相同的一项是()。
随机试题
营分证候的病机特点是
患者,女,59岁,因头痛、头晕、左半身麻木无力2个月,呕吐2天入院。体检:神清,血压正常,眼底视盘模糊不清,视乳头水肿。左面部感觉减退,左侧肢体不全瘫,左侧病理反射阳性。头部CT检查发现有颅内占位性病变。此时最有效的处理措施是
企业专设销售机构销售人员的工资应记入“管理费用”账户。()
甲乙二人共同创办一个合伙企业,甲出资20万元人民币,乙以其土地使用权作价30万元出资。后该合伙企业经营不善,最终不得不解散。该企业尚欠丙60万元货款。根据上述材料,回答下列问题。股份制企业的主要特点包括()。
清官多酷,陈廷敬是清官,却________;好官多庸,陈廷敬是好官,却________;德官多懦,陈廷敬是德官,却不乏铁腕。填入划横线部分最恰当的一项是:
驾驶执照属于()。
国家机关、基层单位、人民团体、企事业单位或个人都可以使用公告来公布具体事项。()
判决宣告前,一人犯数罪,分别被判处有期徒刑,对于数个有期徒刑的并罚,应采用()(2017年一专一第11题)
ThestaffofNormandyCrossingElementarySchooloutsideHoustoneagerlyawaitedtheresultsofstateachievementteststhisspr
UniversityofYorkbiologistPeterMayhewrecentlyfoundthatglobalwarmingmightactuallyincreasethenumberofspeciesonth
最新回复
(
0
)