从VBA变量获取文本字段的值

Question

我有一个表格，我输入了一些值（项目信息）

当用户单击按钮时，在这些字段中输入的值将存储在VBA中的某些变量中：

Private Sub btnPItoKabels_Click()

    Dim Project As String
    Dim ProjectNummer As String
    Dim OpdrachtGever As String

    Project = ProjectInvoer.Value
    ProjectNummer = ProjectNrInvoer.Value
    OpdrachtGever = OpdrachtgeverInvoer.Value

    DoCmd.OpenForm "frmMain", acNormal, , , acFormAdd
    DoCmd.Close acForm, "frmProjectInvoer", acSaveNo

End Sub

现在我想在一些报告中检索这些值（它们将出现在标题中）

这些只是常规文本字段。

如何从三个字符串中检索值并将它们放在这些字段中？

Answer 1

要说哪种设置最适合您并不容易，我建议您修改OK按钮以运行相关报告。

在您的报告设计中，例如项目标题字段设置为：

=Forms!frmProjectInvoer!ProjectInvoer

这将在您打开报告时引用表单中输入的值，请注意您不需要将 .Value 添加到字段名的末尾

Answer 2

如果您的表单未关闭，您可以使用公式“= Forms！MyFormName！Project”（或您引用的任何文本框）轻松引用它们。如果您打算关闭表单，除非将它们指定为GLOBAL，否则无法真正引用这些值，但即便如此，它们只会在当前子程序运行时持续。

Answer 3

我已经做了以下事情来解决问题：

按“ok”按钮时，表单中的值将被放入一个新表“tempProjectInfo”

加载报告时，将从表中获取值，并删除表。