forms - VBA控件引用(窗体)全局变量？

好的，我已经退出Access编程了几个版本，但是我发誓以前我能够将控件指向表单全局变量。示例代码如下：

Option Compare Database
Option Explicit
Dim Testvar As String

Private Sub Form_Load()
Testvar = "Load"
End Sub

Private Sub Form_Open(Cancel As Integer)
Testvar = "open"
End Sub

Private Sub Text0_Click()
Testvar = "settest"
End Sub

我应该能够在控件上放置一个文本框，该框可以看到TestVar变量，但控件却不行。另外，我以前能够使用表单的记录源来执行此操作。

所以，问题-
我疯了吗-那是不可能的？
还是我忘记了如何填写表格？

然后是最重要的问题-解决此问题的最佳方法是什么？
最常用的方法是传入OpenArgs（在这种情况下为记录键），然后将其解析为全局变量，然后几个控件显示打开的args和/或查找要从键显示的值。

我真的很讨厌必须构建例程来重建和加载控件的记录源。希望有人知道更好的方法

最佳答案

除了现有的事件过程之外，您还可以在表单模块中添加一个函数，该函数检索Testvar模块变量的值。

Function GetTestvar() As String
    GetTestvar = Testvar
End Function

然后使用=GetTestvar()作为Text0的控制源。