Question

是否可以让用户选择是/否，并根据该答案在查询中添加参数？

我有一个有'status'字段的表。其中一种状态可以完成。有一个报告打印出具有此字段的报告。有时我想要标记为完整的记录，有时我不想。

是否可以使用查询中的条件/表达式构建器提示用户并询问他们是否需要已完成的记录？

Answer 1

我认为处理此问题的最佳方法是使用yes-no msgbox来了解是否应显示条件，然后使用DoCmd.OpenReport命令中的“where”参数运行报告。

Dim intAnswer As Integer

Dim intAnswer As Integer

intAnswer = MsgBox("Show the details?", vbYesNo)

If intAnswer = vbYes Then
    DoCmd.OpenReport "Form1", acViewPreview, , "[Status] <> ""Completed""", acWindowNormal, "Yadda Yadda"
Else
    DoCmd.OpenReport "Form1", acViewPreview, , , acWindowNormal, "Zippity Doohdah"
End If

如果您想通知报告用户选择的方法是传递OpenArgs字符串，然后在报告上显示该字符串的标签。（上面我传递了“Yadda Yadda”或“Zippity Dodah”）

在报告中，添加一个标签（此处称为Label1）并将其标题设置为等于OpenArgs：

Private Sub Report_Open(Cancel As Integer)

   If Not IsNull(Me.OpenArgs) Then
       Me.Label1.Caption = Me.OpenArgs
   End If

End Sub

提示用户查询参数MS Access

1 个答案: