未分类题

有如下的程序:
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,然后......

(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)