以下用户自定义函数
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.办公室

B.申请人

C.内审员

D.计量员