Question

我需要了解如何通过引用引用另一个模块中的子例程。这就是我想要做的事情：

Module Mod1

   sub_x(pass a reference to this module)

   Private Sub close_me()
       ' do something here
   End Sub

End Module

Module Mod2

    Public Sub sub_x(get the reference to the passed module)
      reference to passed module.close_me()
    End Sub

End Module

Sub_x将接收来自多个不同模块的呼叫。所有调用模块都有一个close_me（）子例程。所以我需要知道哪个模块正在调用sub_x，所以我知道要关闭哪个模块。

Answer 1

在Mod2中：

Public Sub sub_x(ByVal closeModule As Action)
    closeModule()
End Sub

在Mod1中：

Mod2.sub_x(AddressOf Mod1.close_me)

我如何获得模块中的子例程的引用

1 个答案: