【问题标题】:Error with opening navigation subform to SPECIFIC record打开导航子表单到特定记录时出错
【发布时间】:2019-03-21 13:50:23
【问题描述】:

我正在尝试打开指向特定记录的导航子表单。下面是我的代码。

  • List_22 正在显示tblMainDERS

  • 参考号是一个字符串。参考号存在于tblMainDERStblMCV

  • frmMCV 正在显示tblMCV。 (我尝试使用tblMCV.[Reference Number] = RefNum,但这也不起作用)

除了BrowseTo 行中的where 语句外,一切正常。我的表单在frmERS 的导航窗格中打开到frmMCV,但显示表中的第一条记录,而不是参考号指定的记录。

Private Sub List22_DblClick(Cancel As Integer)
    If Not IsNull(Me.List22.Column(0)) Then
        RefNum = Me.List22.Column(0)
        Application.Echo False
        DoCmd.OpenForm "frmERS", , , ("tblMainDERS.[Reference Number]= '" & RefNum & "'")
        DoCmd.BrowseTo acBrowseToForm, "frmMCV", "frmERS.NavigationSubform", ("tblMainDERS.[Reference Number] = '" & RefNum & "'")
        Application.Echo True
    End If
End Sub

任何帮助将不胜感激。

【问题讨论】:

  • openargs 在上一行中工作正常吗?另外,您说frmMCV is displaying tblMCV.,但您的标准是tblMainDERS.[Reference Number]
  • 上一行完美无缺。当我输入 tblMCV.[Reference Number] = RefNum 时,会出现一个弹出窗口,要求在列表框上的 DblClk 之后输入参数
  • 您能否添加一些这些值的屏幕截图,只是表格列的屏幕截图,以显示一些值,以便人们可以尝试复制。一件事,您尝试打开的表单上没有可能干扰的自动过滤器/打开代码等?

标签: ms-access vba


【解决方案1】:

只需在 WHERE 参数中使用字段名和参数即可。

只需:"[Reference Number]='" & RefNum & "'"

【讨论】:

    猜你喜欢
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 2020-05-08
    • 1970-01-01
    • 2014-12-25
    • 1970-01-01
    相关资源
    最近更新 更多