Office中国论坛/Access中国论坛

标题: 请教筛选时快时慢的问题 [打印本页]

作者: tianya0073 时间: 2011-8-26 14:54
标题: 请教筛选时快时慢的问题
我做了一个窗体，如下图，在窗体上要实现筛选功能，做到既可以通过组合框下拉数据筛选，也可以通过在组合框任意输入关键字进行筛选，但现在发现在筛选时不管筛选出的数据多少，总是出现筛选时间快时慢的问题，有的时候很顺，连续反应都很快，但多筛选几个就会卡住，反应很长时间才筛选出来，有的时候却时连续反应都很慢，多选几个应又快了，再选几个又不行了。不知道什么原因，郁闷得不行了，筛选代码见下面，有哪位好人能帮解决一下，谢谢！。

Private Sub Combo28_Change()

Me.Label27.Caption = Me.Combo28.Text

On Error GoTo Err_Combo28_Change
Forms!物料需求查看.物料需求查询11_子窗体.Form.Filter = "[物料代码] LIKE '*' & Forms!物料需求查看.LABEL27.Caption & '*'"
Forms!物料需求查看.物料需求查询11_子窗体.Form.FilterOn = True

Exit_Combo28_Change:
Exit Sub

Err_Combo28_Change:
MsgBox Err.Description
Resume Exit_Combo28_Change

End Sub

[attach]46516[/attach]

作者: todaynew 时间: 2011-8-26 16:46
踹两脚应该可以快一些。

作者: cjnt007 时间: 2011-8-27 14:19
如果 Forms!物料需求查看.LABEL27.Caption 的值是“123”的话，按你贴出来的代码推算，你的得到的筛选条件其实就是：

[物料代码] LIKE '*' & 123 & '*'

复制代码

而我理解应该为：

[物料代码] LIKE '*123*'

复制代码

作者: tianya0073 时间: 2018-6-1 11:03
一直被过滤、筛选时卡顿扰，最近终于发现，当把源表中的数据全部复制出来，再将源表中的数据全删掉，最后将刚复制出来的数据粘贴进去，然后问题解决，过滤、筛选非常顺畅，我想可能是源表之前存在多次大量数据的追加删除造成的（跟索引有关？），但目前采用的删除再复制的方法并不好，请教各位高手是否有更好一方法，谢谢！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)