VB 变量当作function的参数

Question

在FoxPro中
用&和a组合后,&a等价执行
sub Form_Load()
  debug.print &a 返回 --- 1  
end
function a()
  a = 1
end 同样的功能在VB中试了多次没有实现.
请问各位大侠,在VB不具有实现上述目标的功能.

Answer 1

用CallByName替代FoxPro的&Form主程序
  Option Explicit
  Dim gC     As New Class1 '关键要点,一定要放在Class中
  Private Sub CClick()
  Dim tt As String
  tt = "a"
          CallByName gC, tt, VbMethod
  End Sub
在class类中  Public Function a()
      MsgBox "dddddddddddd"
  End Function

Answer 2

为什么一定要加&号呢？
Private Sub Form_Load()
    Debug.Print TestFunc
End SubFunction TestFunc() As Long
    TestFunc = 1000
End Function