我正在创建一个将查询作为记录源的表单。我正在尝试基于组合框构建过滤器选项。当在组合框中选择一个值时,我想在表单上显示此过滤器。例如:如果我选择< 500,则表格只需要显示少于500条记录的字段。
因此需要更新表单记录源查询。我怎样才能做到这一点?
提前谢谢。
答案 0 :(得分:1)
将表单的RecordSource更改为:
Select Top 1000000 * From YourQuery
在组合框中选择一个值后,调整 RecordSource :
Dim RecordSource As String
Dim Records As Long
RecordSource = "Select Top 1000000 * From YourQuery"
Records = Nz(Me!YourComboBox.Value, "1000000")
Me.RecordSource = Replace(RecordSource, "1000000", Records)