请教各位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
    打开窗体后,单击命令按钮,文本框中显示的内容是?

解决方案 »

  1.   

    你的字体有问题,还是没打vb sp6
    我们这都正常 :  12
      

  2.   

    对比一下:
    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