运行下列程序,窗体中的显示结果是:()。 OptionCompare DatabaseDim X AsIntegerPrivateSub Form
运行下列程序,窗体中的显示结果是:()。
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