请教各位VB高手!
在窗体中添加一个命令按钮(名为commamd1)和一个文本框(名为Text1),编写事件代码如下:
Private Sub Command1_Click()
Dim x As Integer,y As Integer,z As Integer
x=5:y=7:z=0
Me! Text1=""
Call p1(x,y,z)
Me! Text1=z
End Sub
Sub p1(a As Integer,b As Integer,c As Integer)
c=a+b
End Sub
打开窗体后,单击命令按钮,文本框中显示的内容是?
在窗体中添加一个命令按钮(名为commamd1)和一个文本框(名为Text1),编写事件代码如下:
Private Sub Command1_Click()
Dim x As Integer,y As Integer,z As Integer
x=5:y=7:z=0
Me! Text1=""
Call p1(x,y,z)
Me! Text1=z
End Sub
Sub p1(a As Integer,b As Integer,c As Integer)
c=a+b
End Sub
打开窗体后,单击命令按钮,文本框中显示的内容是?
我们这都正常 : 12
Option ExplicitPrivate Sub Command1_Click()
Dim x As Integer, y As Integer, z As Integer
x = 5: y = 7: z = 0
Me!Text1 = ""
Call p1(x, y, (z))'给z加个括号
Me!Text1 = z
End Sub
Sub p1(a As Integer, b As Integer, c As Integer)
c = a + b
End Sub
z不加括号,最后z=12,这是因为你按地址传递参数,参数值改变了,给z加个括号后,按值传递参数,z=0