首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
42
问题
编写如下程序:
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/neQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()StaticyAsIntegerClsFori=0To2
为了使复选框禁用(即呈现灰色),应把它的Value属性设置为【】。
(1)在窗体Forml上画一个命令按钮,名称为Command1,标题为“打开文件”,在窗体上添加适当的控件并编写适当的程序代码,要求程序运行时,单击“打开文件”命令按钮,可以弹出“打开文件”对话框。程序运行时的窗体界面如图5—1所示。注意:保存时
在名称为Form1的窗体上画一个文本框,名称为Text1,MultiLine属性为True,ScrollBars属性为2;两个命令按钮,名称分别为Cmd1和Cmd2,标题分别为“读人数据”和“计算保存”,如图3—6所示。要求程序运行后,如果单击“读人数据”
(1)在名称为Forml的窗体中画一个名称为Textl的文本框,再添加一个名称为Timer1的计时器。请设置适当的控件属性并编写适当的事件过程,使得程序在运行时,每隔3秒钟文本框中的数字加1,如图62—3所示。程序中不得使用任何变量。注意:存盘时
数据库的逻辑模型设计阶段的任务是将______转换成关系模式。
数据库系统的主要特点为数据集成性、数据的高______和低冗余性、数据独立性和数据统一管理和控制。
当我们输入代码时,VisualBasic可以自动检测______错误。
已知二叉树BT的后序遍历序列是dabec,中序遍历序列是debac,它的前序遍历序列是______。
随机试题
爱国主义是制约人们行为、调整个人与国家和民族关系的道德原则和规范。
结核病的原发综合征典型的X线胸片表现是
患者,男,3岁,左上颌乳中切牙因碰到硬物致牙齿嵌入牙槽窝,最恰当的处理是
采用价格指数调整价格差额的价格调整公式方法,一般情况下适用于使用的材料()。
油漆(以丙烯酸聚合物为基本成分,溶剂为50%)
下列方法中不属于国内生产总值核算方法的是()。
现有一张永久债券,其市场价格为20元,永久年金为2元,该债券的到期收益率为( )。
根据我国《合伙企业法》的规定,合伙企业合伙人的出资方式有()。
固定资产投资保持较快增长。上半年,500万元以上固定资产投资完成6617.3亿元,增长18.1%。其中,第三产业投资增长29.9%,分别高于第一、第二产业8.6和19.5个百分点,与全省投资增长的贡献率达到63.4%;三次产业投资比重由去年同期的2.0:5
WhenthefloodwatersrecededfollowingHurricaneKatrina’sdirecthitonNewOrleans,jazzfansaroundtheworldbreathedasig
最新回复
(
0
)