要通过名称在一个表单中引用另一个表单中的变量,可以使用Forms集合和Controls集合来完成。以下是一种解决方法的示例代码:
在frmA表单中,假设有一个名为txtName的文本框控件,我们想要在frmB表单中引用它的值。
在frmB表单的代码模块中,可以使用以下代码来引用frmA表单中的txtName控件:
Dim frmA As Form
Dim txtName As TextBox
Set frmA = Forms("frmA")
Set txtName = frmA.Controls("txtName")
MsgBox txtName.Value
上述代码首先使用Forms集合中的表单名称("frmA")来获取frmA表单的引用。然后使用Controls集合中的控件名称("txtName")来获取txtName控件的引用。
最后,我们可以通过引用的控件来获取其值,并在消息框中显示出来。
请注意,上述代码需要确保frmA表单处于打开状态。如果frmA表单未打开,可以使用以下代码打开它:
DoCmd.OpenForm "frmA"
请根据实际情况进行相应的修改和调整。