允许项目中的所有类访问表单

Question

我目前正在设计一个带有 Windows 窗体的项目。我还在创建要与此表单交互的类。除了将表单传递给我创建的每个对象之外，还有一种方法可以允许任何类与表单进行交互。这主要用于调试目的，我只想访问文本框。目前我必须这样做：

Dim x as new MyClass(Me)

其中 me 指的是我在其中实例化 MyClass 的表单。这意味着我需要在 MyClass 的 Sub New 中为表单分配一个变量（创建表单的新实例没有帮助）。 在班级内，我访问其他班级。如果有一种方法可以与我的表单进行交互而无需不断地向前传递，那就太好了。

谢谢。

Answer 1

使用您的Form 的Public 变量声明创建一个Public Module 并分配它。

Public Module FormInstance
    Public Property MyForm as Form1
End Module

'Somewhere on you Form Startup
    FormInstance.MyForm = me