Microsoft Access -预览报告，其中日期字段与文本字段日期相同

Question

如何在Microsoft Access中使用窗体中的按钮预览报表?目前，我有这样的VBA代码:

Private Sub ThisReceiptBtn_Click()
DoCmd.OpenReport "Picking_PackingReceipt", acPreview, , _
"PickingDate = Today()"
End Sub

但是，它不能显示今天的报告。

另一个按钮用于预览报表，其中日期与表单中的日期字段相同。代码如下:

Private Sub ThisReceiptBtn_Click()

If IsNull(Me!txtPickID) Then
MsgBox "Please select a valid record", _
vbOKOnly, "Error"
Exit Sub
End If
DoCmd.OpenReport "Picking_PackingReceipt", acPreview, , _
"PickingDate =" & Me! TxtDate

End Sub

但它也不起作用。请帮助。

Answer 1

Today()在VBA中不是有效的函数。使用Date()

对于第二个版本，尝试:"PickingDate = #" & Me.TxtDate & "#"