首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim m As Integer, n As Integer n=2 For m=1 To 3 Print proc(n); Next m End Sub F
编写如下程序: Private Sub Command1_Click() Dim m As Integer, n As Integer n=2 For m=1 To 3 Print proc(n); Next m End Sub F
admin
2015-08-28
122
问题
编写如下程序:
Private Sub Command1_Click()
Dim m As Integer, n As Integer
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
程序运行后,单击命令按钮Command1,输出结果为( )。
选项
A、3 3 3
B、3 4 5
C、3 5 6
D、1 2 3
答案
B
解析
变量b定义为Static即静态变量,它的特点是每次调用都会保留上次的值。程序click事件中调用了3次proc(n),即proc(2):
第一次,a=a+1=0+1=1, b=b+1=0+1=1 , proc=a*b+i=1*1+2=3;
第二次,a=a+1=0+1=1, b=b+1=1+1=2 , proc=a*b+i=1*2+2=4;
第三次,a=a+1=0+1=1, b=b+1=2+1=3 , proc=a*b+i=1*3+2=5;
因此输出的结果为3 4 5。
转载请注明原文地址:https://kaotiyun.com/show/44Qp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个文本框,名称为Textl(可显示多行),然后再画三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为“读数”、“统计”和“存盘”,如图1.5所示。程序的其功能是:单击“读数”按钮,则把考生目录下的in5.t
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个文本框,其名称为Textl,然后通过属性窗口设置窗体和文本框的属性,实现如下功能:①在文本框中可以显示多行文本;②在文本框中显示垂直滚动
设有以下循环结构;Do循环体LoopWhile<杂件>则以下叙述中错误的是______。
要把名称为List1的列表框中当前选中的一项删除,应执行以下语句中的______。
在窗体有一个水平滚动条名为Hscrolll,其属性设置如下:LargeCh8nge=15,SmallChange=3,Max=100,Min=20,Value=45现单击该滚动条向右的箭头,Value的值将变为______。
下列哪条语句是错的______。
对用MsgBox显示的消息框,下面______是错的。
以下叙述中错误的是______。
在一个容量为32的循环队列中,若头指针front=3,尾指针rear=2,则该循环队列中共有______个元素。
在程序设计阶段应该采取______和逐步求精的方法,把一个模块的功能逐步分解,细化为一系列具体的步骤,继而用某种程序设计语言写成程序。
随机试题
引起病毒性心肌炎最常见的致病菌是
小开颌运动为大开颌运动为
女患者,25岁,产后7天出现小腹疼痛,拒按,恶露量少,行而不畅,色紫黯,舌质黯,脉沉涩。应首选
学校除了按照国家课程标准开设生物课之外,还增设了其他一些生物课程,如趣味生物实验、动物世界等供学生选择。这些课程属于()。
瓦特发明了世界上最早的火车,也因而被誉为“铁路机车之父”。()
张教授:在一些西方国家,出于实验目的给动物做外科手术必须向官方正式申报,在申报中必须说明这样的手术对动物造成痛苦、伤害乃至死亡的风险有多大、采取何种措施避免或降低此种风险。不做这样的申报,或申报不被批准,相关的动物外科手术就是非法的。有点搞笑的是,医生给病
ThedevelopmentoftheSemanticWebproceedsinsteps,eachstepbuildingalayerontopofanother.Thepragmaticjustificationf
下面程序的功能是将一个字符串str的内容颠倒过来,请填空。#includemain(){inti,j,【】;charstr[]={"1234567"};for(i=0,j=strlen(str)【】;i
A、B、C、D、B
WithinEUprimaryeducation,aclearmajorityofpupilschoosetostudyEnglishlikeaforeignlanguage.Indeed,learningEnglis
最新回复
(
0
)