使用子表单作为报表选项

Question

相当新鲜。我有一个主表单，其中包含一个作业号列表框和一个不同报表的子表单。我希望能够选择一个作业名称，然后双击报告名称进行预览，但它会给我一个错误。它似乎无法从列表框中识别我选择的作业名称。错误消息是＆＃34;编译错误：找不到方法或数据成员＆＃34;。查看图像。

以下是我使用的代码，该代码位于子窗体中文本框的双击事件中。

Private Sub ReportName_DblClick(Cancel As Integer)

Dim strFilter As String
If IsNull(Me.lstJobName) Then
    MsgBox "You Must Select A Job"
    Me.lstJobName.SetFocus
Exit Sub
End If

strFilter = "JobName = '" & Me.lstJobName & "'"
DoCmd.OpenReport ReportName.Value, acViewPreview, , strFilter

End Sub

尝试逐步解决这个问题，现在只需要报告进行预览。稍后我会想要检查我需要打印的报告，然后只需单击一个按钮进行打印。

Answer 1

代码在子表单后面，因此Me。 qualifier是子表单的别名，代码在子表单上查找列表框但实际上是在主表单上。

strFilter = "JobName = '" & Me.Parent.lstJobName & "'"