关于子程序的调用，请指点一下。

Question

我把子程序写在标准模块里，便于其他窗体调用。如果子程序中用到控件如何处理呢？比如：
   Public Sub jf()
      dim ma as Single
      ma= Val(Text1.text)+ Val(Text2.text)+20   
      ......
   End sub   其中Text1和Text2都是文本框控件，在需要调用的窗体中均存在。我在调用这个过程时（好几个不同的窗体需要调用这个过程）能否直接用Call jf语句得到ma的值？

Answer 1

你可以把窗体作为一个参数传给子过程。public sub jf(frmA as form)
    ....
    ma=val(frmA.text1.text)+val(frmA.text2.text)+20
    ....
end sub

Answer 2

改成这样应该可以
Public Sub jf(Byref frm as Form)
      dim ma as Single
      ma= Val(frm.Text1.text)+ Val(frm.Text2.text)+20   
      ......
End sub

Answer 3

楼上两位不闲麻烦吗？直接将TEXT做为参数不就行了!!
Public Sub jf(text1 as TextBox, text2 as TextBox)
      dim ma as Single
      ma= Val(Text1.text)+ Val(Text2.text)+20   
      ......
   End sub