有如下的程序: Private Sub Command1_Click() Dim k As Integer,m AB Integer Dim P As Integer k=4:m=1 P=Fun(k,m) =Print P; P=Fun(k,m) :Print P End Sub Private Function Fun(a As Integer,b As Integer) Static m As Integer,i As Integer m=5:i=2 i=i+m+1 m=i+a+b Fun=m/2 End Function 单击命令按钮后,输出结果为 A.2 2 B.4 4 C.5 5 D.6 6
A.4 B.5 C.6
【参考答案】
D 解析:在Sub过程中,程序段先定义了3个Integer型变量k,m,F,并赋给k初值为4,m的初值为1,然后......