使用按钮打开表单记录答案

【问题标题】：open form record with button使用按钮打开表单记录
【发布时间】：2015-03-30 22:36:24
【问题描述】：

我需要从另一个表单上的按钮打开一个表单（货件），并将该打开的表单保存在“CustomerID”记录中，以便您可以轻松地向该客户添加新货件。有什么建议么？我尝试使用宏无济于事，但代码让我无法理解。一切都通过关系下的 customerID 链接。

我正在使用 access 2007。

【问题讨论】：

标签： ms-access button

【解决方案1】：

创建一个名为 btnOpenForm 的新按钮，并将其添加到模块中：

Private Sub btnOpenForm_Click()
On Error GoTo Err_btnOpenForm_Click

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "frmMyForm"
    stLinkCriteria = "[CustomerID] = '" & Me.CustomerID & "'"
    DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_btnOpenForm_Click:
    Exit Sub

Err_btnOpenForm_Click:
    MsgBox Err.Description
    Resume Exit_btnOpenForm_Click

End Sub

这里的关键是变量“stLinkCriteria”。您将其设置为包括字段名称（“CustomerID”）和您想要过滤的值（“Me.CustomerID”）。如果表格的字段名称或文本框名称不同，则必须适当地编辑这些值。此外，您还必须将“stDocName”的值更改为您的表单名称。

【讨论】：

好的，感谢您的快速回复。我将 stDocName = "frmMyForm" 更改为 stDocName = "Form_Shipments" 但按钮不起作用（我也尝试了 Shipments）
它没有打开表单。
确保按钮的 On Click 事件指向这个 sub。
应该在下拉控件中吗？还是省略号？
我认为它在下拉列表中。您应该只需要从下拉列表中选择“[Event Procedures]”。但是，如果您单击省略号，它应该会将您带到相同的代码块。