Private x As Integer
   Private Sub Command1_Click()
      x = 5: y = 3
      Call Proc(x, y)
      Label1.Caption = x
      Label2.Caption = y
   End Sub
   
   Private Sub Proc(ByVal a As Integer, ByVal b As Integer)
       x = a * a
       y = b + b
   End Sub
运行结果x=25，y=3
加一句Private y As Integer
x=25，y=6

什么意思

还是不懂什么意思