Ms access 在VBA中定义复杂的静态数据

我有一个MS Access项目，我试图定义大量静态数据，我有详细信息要加载到一个非常复杂的表单中

我有此数据的设置类型：

Public Type ColumnData

    Name As String
    Width As Single
    Search As String * 1

End Type

Public Type FormData
    Form_Title As String
    View_Name As String
    Edit_Form As String
    ObjectSingular As String
    ObjectPlural As String
    Columns() As ColumnData
End Type

是否有办法将此数据添加到模块中的全局变量？与我处理基本数据类型的方式相同：

Public Const g_LoggedIn As Boolean = False
Public Const g_APIKey As String = "ABC123"
Public Const g_TablePrefix as String = "auyhso_"
Public Const g_Columns As Variant = Array("1", "2", "3")

比如：

Public g_FormData as Collection
g_FormData.Add New FormData(Form_Title:="My Title", View_Name:="My View")

---

不，这不可能。首先，这个：

Public Const g_Columns As Variant=Array（“1”、“2”、“3”）

已经不起作用了<代码>数组（）是一个函数。不能有常量数组

VBA仅支持简单数据类型作为常量

---

您可以使用一个返回常量而不是常量的函数，并接受应用程序将受到的较小性能影响。

函数听起来是可能的，我将接受性能影响，而不是让数百个字符串散布在我的代码中！这是一个有点微妙的设置，但工作，性能打击是非常低的，谢谢。