以文本方式查看主题
- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 输入订单号 窗口表格中只列出当前输入的订单 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=13038)
|
-- 作者:ruan
-- 发布时间:2011/9/25 14:52:00
-- 输入订单号 窗口表格中只列出当前输入的订单
输入订单号 窗口表格中只列出当前输入的订单.要直接输入就出来 不用通过筛选
怎么弄~ 此主题相关图片如下:01.png
|
-- 作者:yangming
-- 发布时间:2011/9/25 14:58:00
--
当前输入的订单有多少行啊?如果只是当前光标所在的行,那好办,如果是多行,还得用筛选出来,呵
[此贴子已经被作者于2011-9-25 14:58:25编辑过]
|
-- 作者:ruan
-- 发布时间:2011/9/25 15:00:00
--
有多行是筛选出来 就是不用加筛选按钮 当订单号 输入满足条件时 下表自动列出当前订单号的信息 不显示其他的 不满足条件就不显示
|
-- 作者:yangming
-- 发布时间:2011/9/25 15:46:00
--
在窗口的AfterLoad 事件中加上筛选的代码便可以了,呵
|
-- 作者:狐狸爸爸
-- 发布时间:2011/9/25 16:23:00
--
设计文本框的TextChanged事件,大概如下,自行调整:
Tables("表名").Filter = "生产号 = \'" & e.Sender.Text & "\'"
|
-- 作者:ruan
-- 发布时间:2011/9/26 9:43:00
--
当内容为空时就会报错怎么解决... 此主题相关图片如下:01.png
|
-- 作者:狐狸爸爸
-- 发布时间:2011/9/26 9:56:00
--
if e.sender.text >"" then
Tables("表名").Filter = "生产号 = \'" & e.Sender.Text & "\'"
Else
Tables("表名").Filter = ""
end if
|
-- 作者:ruan
-- 发布时间:2011/9/26 11:53:00
--
谢谢~
|