运行下列程序，窗体中的显示结果是：（　　）。 OptionCompare D

问题：

[单选] 运行下列程序，窗体中的显示结果是：（　　）。

OptionCompare Database

Dim X AsInteger

PrivateSub Form_Load()

x=3

EndSubPrivate Sub Commandll_click()

Static aAs Integer

Dim b AsInteger

b=x^2

funl x，b

funl x．b

MsgBox”x=‘’&x

End Sub

Subfunl(ByRef Y As Integer，ByVal z AS Integer)

y=y+z

z=y-z

End Sub

A . x=3

B . x=2

C . x=21

D . x=12

C

flag函数第一个参数是ByRef传递参数，所以实参也会被改变，而第二个参数是ByVal形式传递参数，不会改变实参的值，因此经过两次调用funl函数后，X的值为21，而b的值9不会改变。