Ms Access List Box - 双击新表格时传递参数

Question

我在Microsoft Access 2010中有一个列表框

我试图在双击记录时将所有参数传递给新表格（frmpopUpPatientInfo），例如当我点击患者：21时，它应该通过21，克林顿，账单到新表格。 我尝试的是下面lstEvents是列表框名称，frmCalendar是父表单

Private Sub lstEvents_DblClick(Cancel As Integer)
    DoCmd.OpenForm "frmpopUpPatientInfo"

    MsgBox Me.Parent.frmCalendar.lstEvents.Column(1), vbInformation, "Test"

End Sub

我得到的错误是

Answer 1

如果您要传递到已打开的新表单，则不应使用“父...”参考。

以下是将数据传递到表单的两种方法。

' Pass arguments when the form is opened
DoCmd.OpenForm "frmpopUpPatientInfo", acNormal, , , , , Format(Now(), "DD-MMM-YYYY")
' Or reference a control as follows:
Forms!frmpopUpPatientInfo.myTargetField= Format(Now(), "DD-MMM-YYYY")

Answer 2

尝试

Forms!frmCalendar!lstEvents.Column(1)

https://www.599cd.com/tips/access/forms-formname-field-notation/