如何从报表上的选定文本框中提取文本？ VBA

Posted 2023-05-07

【中文标题】如何从报表上的选定文本框中提取文本？ VBA

【英文标题】：How to pull text from the selected TextBox on a Report? VBA

【发布时间】：2017-10-06 20:42:00

【问题描述】：

我有一个报告 (rptCourses)，其中包含 170 个包含课程名称的文本框，这些文本框是从访问表 (tblCourses) 中提取的。当用户单击其中一个课程名称文本框时，将加载一个包含文本框 (txtboxCourseTitle) 的表单 (frmRateCourse)，该文本框本质上是一个标题，理想情况下将包含所选报告文本框的课程名称。

我的问题是：如何从选定的报告文本框中获取文本并将该文本输入到加载的表单的文本框中？

如果这个问题已经存在，我深表歉意！并提前感谢您的任何帮助！

【参考方案1】：

最简单的方法是将字符串作为OpenArgs 传递。

Private Sub CourseName_Click()
    DoCmd.OpenForm "frmRateCourse", OpenArgs:=Me.CourseName.Value
End Sub

在 frmRateCourse 中：

Private Sub Form_Open(Cancel As Integer)
    Me.lbTitle.Caption = Nz(Me.OpenArgs, "<no Title>")
End Sub

【讨论】：

谢谢！这正是我想要的。我对此很陌生，并且在我前进的过程中自学。没想到要使用 OpenArgs

酷。 :) 如果答案解决了您的问题，您可以accept 它，这也将问题标记为已解决。 @Fiddle_stixx