题目内容:
如果存在如下过程:
PrivateFunctionFMax(a()AsInteger)
DimFirstAsInteger,LastAsInteger,iAsInteger
First=LBound(A)
Last=UBound(A)
Max=a(First)
Fori=FirstToLast
Ifa(i)>MaxThenMax=a(i)
Nexti
FMax=Max
EndFunction
在窗体上添加一个命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
ReDimm(1To4)AsInteger
m(1)=20:m(2)=30:m(3)=50:m(4)=100
c=FMax(m)
Printc
EndSub
单击命令按钮,其输出结果为【12】。
参考答案:
答案解析: