Question

考虑：

我有一个表单，我需要为个人客户显示付款事件。我不想在支付表中显示所有列，我想要用户友好的列名，我希望Access显示一个弹出窗体，如果用户点击表格的一行（付款事件），它会显示信息。 / p>

首先，我不确定Access 2002和VBA是否允许我这样做。其次，我不确定如何在表格上点击个别付款活动。

我认为我可以做类似的事情：

strSQL = "SELECT payment.payment_id, payment_amount AS Amount, payment_date AS Date" & _
"FROM contact_payment, payment " & _
"WHERE contact_payment.contact_id =" & forms([ContactForm].contact_id & _
"AND payment.payment_id = contact_payment.payment_id"

以获取可点击表单的数据。这是正确的方法，还是有更好的方法来实现这一目标？

Answer 1

您可以使用表单DblClick事件（或Click事件）打开新表单：

Private Sub Form_DblClick(Cancel As Integer)
    DoCmd.OpenForm "frmMoreInfo", , , "ID = " & ID
End Sub

Access 2002 / VBA - 如何从查询中填充子表单以允许用户选择行

1 个答案: