Question

我找到了这个董事会，并且在提出类似问题时我认为我得到了答案。

我有一个按区域过滤的表单。

用户从下拉列表中选择一个值，并为该区域中的所有行号提供子表单。

我想使用能够点击子窗体中的LineNo，并使用LineListMstr_Entry打开它，并填入LineNo字段的新条目。

我正在使用的代码是：

Private Sub LineNo_Click()

DoCmd.OpenForm "LineListMstr_Entry", acNormal, , "LineNo = " _
    & [LineListMstr_Entry]![LineNo], acFormEdit, acWindowNormal

End Sub

Answer 1

您的代码应该符合

的要求

Private Sub LineNo_Click()
    DoCmd.OpenForm "LineListMstr_Entry", DataMode:=acFormAdd, _
                                         OpenArgs:=Me.[LineNo]
End Sub

然后在Form LineListMstr_Entry的On Load事件中你可以有类似的东西。

Private Sub Form_Load()
    If Me.NewRecord Then _
        Me.LineNo = Me.OpenArgs
End Sub

从前一个表单中打开一个带有Text字段值的表单

1 个答案: