Question

我有一小段代码嵌入到连续表单上的按钮中。它将打开一个表单，提供不在搜索结果上的其他详细信息。

我的问题是，似乎当所有细节都存在时，表格会正确打开，如果缺少任何字段（比如支付日期或代金券号码），表格会打开空白吗？

以下是搜索查询的代码，以及用于打开表单的按钮的代码：

Private Sub Command1_Click()
Dim strsearch As String
Dim strText As String
strText = Me.txtSearch.Value
strsearch = "Select * from tblInvoiceLog where Vendor_Number like ""*" & strText & "*"" or Vendor_Name like ""*" & strText & "*"" or Invoice_1 like ""*" & strText & "*"" or Invoice_2 like ""*" & strText & "*"" or Invoice_3 like ""*" & strText & "*"" or Invoice_4 like ""*" & strText & "*"" or Invoice_5 like ""*" & strText & "*"" or Check_Request_Total like ""*" & strText & "*"" or Voucher_Number like ""*" & strText & "*"" or Notes like ""*" & strText & "*"" or TransAction_Id like ""*" & strText & "*"" ORDER BY [Pay_Date] DESC"
Me.RecordSource = strsearch
End Sub

Private Sub Command53_Click()
DoCmd.OpenForm "frm: Check Request Info (Redesign)", , , "TransAction_Id = " & TransAction_ID
End Sub

我以为我占了这个等式中的所有变量？任何人都可以提出建议吗？

Answer 1

使用多个表单/子表单时，请确保您的记录源都指向同一个表/查询。一个新手答案/问题肯定，但它可以省去头痛谢谢Wayne G. Dunn

Docmd.Openform打开一个空白表格？

1 个答案: