Microsoft Access-记录表单加载

Question

我很好奇，是否有可能在我以一种格式加载记录时选择为该记录添加报价，所以我选择添加报价（按钮），将其带到报价页面。然后，我希望该表单自动加载以前在其他表单中选择的记录。

客户表格：

报价表： 这是数据流： 选定的记录（“添加作业”）>单击“添加项目”按钮>“项目列表”加载>然后自动加载先前在“添加作业”中选择的记录。

需要加载的字段是“项目ID”和“客户名称”

Answer 1

使用OpenArgs方法的DoCmd.OpenForm参数

---

• 单击Add Quotes按钮打开“报价”表单时，通过openArgs参数发送详细信息/链接的ID。
• 在Quotes表单加载事件中，您可以使用Me.OpenArgs
获取传递的详细信息

请参见下面的示例代码

---

  

在“添加报价”按钮上单击

Private Sub AddQuotes_Click()

    DoCmd.OpenForm "frmQuotes", OpenArgs:=me.ClientID

End Sub

  

报价表

Private Sub Form_Load()
    Dim varArgs

    varArgs = Me.OpenArgs

    'Fill the controls with recordset data
    If Not IsNull(varArgs) Then
        With CurrentDb.OpenRecordset("SELECT * FROM tblClients WHERE ClientID = " & varArgs, dbOpenForwardOnly )
                Me.ClientID = !ClientID
                Me.ClientName = !ClientName
                Me.ClientAddress = !ClientAddress
                Me.ClientPhone = !ClientPhone
                Me.ClientEmail = !ClientEmail
            .Close
        End With
    End If

End Sub