A-A+

以下用户自定义函数Function Func(a As Integer b As Integ

2022-08-06 05:51:11 问答库 阅读 176 次

问题详情

以下用户自定义函数
Function Func(a As Integer,b As Integer) As Integer
Static m As Integer,i As Integer
m=0:i=2
i=i+m+i
m=i+a+b
Func=m
End Function
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim k As Integer,m As Integer,p As Integer
k=4:m=1
P=Func(k,m)
Print p
End Sub
程序运行后,单击命令按钮,输出结果为
A.8
B.9
C.10
D.11

参考答案

正确答案:A
解析:变量;的计算过程为i=2+0+1=3,变量m的计算过程为m=3+4+1=8,m的值通过子函数名Fun c返回。

考点:函数,用户