- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 筛选问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=2066)
-- 发布时间：2009/3/9 15:46:00
-- 筛选问题
with e.Form
if e.sender.text <> "请输入关键字" then
Dim dst As WinForm.DataList = .Controls("DataList2")
Dim txb1 As WinForm.TextBox = .Controls("TextBox1")
dst.RowFilter = "[IO] Like \'*" & txb1.text & "*\' or [GO NO] Like \'*" & txb1.text & "*\'or [客户合同号] Like \'*" & txb1.text & "*\'or [英文款号] Like \'*" & txb1.text & "*\'or [商标] Like \'*" & txb1.text & "*\'or [客户名称] Like \'*" & txb1.text & "*\'or [款号] Like \'*" & txb1.text & "*\'or [布款号] Like \'*" & txb1.text & "*\'or [季节号] Like \'*" & txb1.text & "*\'or [CAPS] Like \'*" & txb1.text & "*\'"
end if
end with
我用这个代码用于在datalist中筛选的.最近几次更新后,如果我输入要筛选的数据在datalist中没有的话,datalist会出现红叉,正确的却没有问题的.一出现红叉我必须退出窗口,重新打开窗口,非常讨厌.以前一直没有问题,筛选时如果没有相对应的数据只会出来一个对话框,我重新输就可以了.
-- 发布时间：2009/3/9 16:59:00
--
如果出现红叉就不是你的问题的，让老六来搞定.
-- 发布时间：2009/3/9 17:00:00
--
是的，我有时也出现过这个问题．一直也没找到原因，但我重新做一遍，又好了．
-- 发布时间：2009/3/9 17:10:00
--
呵呵，做个例子文件上来测试一下看看
-- 发布时间：2009/3/9 17:20:00
--
以下是引用狐狸爸爸在2009-3-9 17:10:00的发言：
呵呵，做个例子文件上来测试一下看看
呵呵，做个例子文件上来测试一下看看
开发者进去,密码888. 面板上的按钮进去都会有这种查询,你可以输一个不存在的数据试一下.
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:跟单系统外部数据.rar |
-- 发布时间：2009/3/9 17:59:00
-- [求助]
没法测试。
-- 发布时间：2009/3/9 18:44:00
--
已经改进，下次不会有这个问题了。
-- 发布时间：2009/3/10 7:49:00
--
以下是引用狐狸爸爸在2009-3-9 18:44:00的发言：
已经改进，下次不会有这个问题了。
已经改进，下次不会有这个问题了。
还有,狐爸上次我提到动态的列表项目,组合框抖动的问题,你看一下.在面板上打开订单情况,新增一行后你试一下组合框的下拉.
-- 发布时间：2009/3/12 16:20:00
--
以下是引用blackzhu在2009-3-10 7:49:00的发言：
还有,狐爸上次我提到动态的列表项目,组合框抖动的问题,你看一下.在面板上打开订单情况,新增一行后你试一下组合框的下拉.
请狐爸看看!
-- 发布时间：2009/3/12 17:31:00
--
你这些不是动态的列表项目，应该将Enter事件中的代码全部移到窗口的AfterLod事件中，可以避免这个问题。
而且效率更高。