| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 关于筛选的问题！如果数据量大 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=12041) |
| -- 作者：gaoyong30000 -- 发布时间：2011/8/20 15:41:00 -- 关于筛选的问题！如果数据量大 我在窗口加了一个快速 检索的文本框 代码如下
Dim txt As String = e.Form.Controls("TextBox7").Text
由于这个检索框是全盘筛选的 如果数据量大的话 我担心会出现慢的情况！
如果有这个情况的话 能否通过位置定位就可以了？ 要是这样的话 能否再加一个状态栏能显示查询到几条记录了 再添加一个按钮便于定位找到的记录！ [此贴子已经被作者于2011-8-20 15:41:40编辑过]
|
| -- 作者：blackzhu -- 发布时间：2011/8/20 15:49:00 -- 你这个筛选要这样做比较讨厌的.改变一下筛选思路做个按钮,将码放入按钮,将文本框的数据删除: Dim txt As String = e.Form.Controls("TextBox7").Value
Dim tbl As Table = Tables("客户档案") If txt = "" Then tbl.filter = "" Else txt = "\'*" & txt & "*\'" tbl.filter = "底盘号 Like " & txt & " Or 编号 Like " & txt & " Or 车牌号 Like " & txt & " Or 型号 Like " & txt End If |
| -- 作者：gaoyong30000 -- 发布时间：2011/8/20 16:49:00 -- 额~ 也行吧 呵呵 |