(11)运行下列程序 窗体中的显示结果是:x= 【11】 。Option Compare DatabaseDim x As Integer Priv

计算机 窗体,程序 已帮助 人

(11)运行下列程序,窗体中的显示结果是:x= 【11】 。

Option Compare Database

Dim x As Integer

Private Sub Form_Load()

x=3

End Sub

Private Sub Command11_Click()

Static a As Integer

Dim b As Integer

b=x^2

fun1 x,b

fun1 x,b

MsgBox "x="&x

End Sub

Sub fun1(ByRef y As Integer,ByVal z As Integer)

y=y+z

z=y-z

End Sub

热搜:人类学家爱德华霍尔关于人际互动界限的研究结果显示