首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
2020-07-22
33
问题
编写如下程序:
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/JPHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行下列语句:strInput=InputBox("请输入字符串","字符串对话框","字符串")将显示示输入对话框。此时如果直接单击“确定”按钮,则变量strInput的内容是()。
有下面程序代码:PrivateSubCommandlClick()Fork:5To1Step—1X=k+x*10NextkPrintxEndSub程序运行后,单击命令按钮Commandl,输出结果是()。
假定有如下情况语句:SelectCaseX能表示|X|>5的Case子句是
若要把窗体上命令按钮Command1的状态设置为不可用,应该执行的命令是
为了使窗体的大小可以改变,必须把它的BorderStyle属性设置为
命令按钮、单选按钮、复选框都可以通过Picture属性在控件上显示图片,但需事先设置某一属性,该属性为
编写如下程序:PrivateSubCommandl_Click()Dima(10)AsStrings=“123456”:n=Len(s)Fork=1Tona(k)=Mid(s,k,1)NextkFori=
下列符号常量的声明中不合法的是
以下说法中正确的是
随机试题
患者,男性,35岁。一年前开始出现低热、乏力,近半年来逐渐出现四肢关节与肌肉酸痛,举手及登楼困难,同时在眼睑、鼻梁、远端指间关节及甲周围皮肤出现暗红色斑。该患者最可能的诊断是
男性患者,70岁。突然头痛、恶心、呕吐3小时。体检:血压25/15kPa(190/115mmHg),口角右偏,左侧鼻唇沟变浅,伸舌左偏,左侧偏瘫。关于上述病例,目前下列哪项处理不妥当
女,65岁。多关节肿痛2年,晨僵约l小时,查体:双手掌指关节对称性肿胀,压痛,双手x线示:双侧第2、3掌指关节骨破坏,该疾病主要治疗药物不包括
统计分析的步骤一般包括()以及撰写统计分析报告。
银行从资产负债管理时代向全面风险管理时代过渡的标志是()。
你去了新单位,小刘干了你原来的工作,经常向你请教问题,导致你没完成新单位的工作。被领导批评,你怎么办?
设对(I)中的任意向量ξ2,ξ3,证明ξ1,ξ2,ξ3线性无关.
Ifthisweekendisyawningaheadofyou,offeringnothingbutthesameoldroutinesandhouseholdduties,thendon’tdespair:bo
设A=[6*8-2],B=6*8-2,C="6*8-2",属于合法表达式的是
The______ofaculturalphenomenonisusuallyalogicalconsequenceofsomephysicalaspectinthelifestyleofthepeople.
最新回复
(
0
)