以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  窗口输入条件精确筛选  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=40699)

--  作者:asionwong
--  发布时间:2013/9/26 22:55:00
--  窗口输入条件精确筛选
1、出货单中有“付款情况”列和“客户编码”列
2、回款单窗口中有一个客户编码DropDownBox框,用于模糊筛选客户表中的客户编码。
3、要求在回款单窗口的客户编码DropDownBox框输入客户编码,tables(窗口1_table1)关闭后,马上自动打开tables(窗口2_table1)进行精确筛选
4、精确筛选条件是tables(窗口2_table1)的客户编码只等于DropDownBox框的客户编码,同时“付款情况”只等于“未付款”
以下代码可以进行修改利用吗?还有除了这个还需做哪些编写?。
菜鸟刚学
Dim txt As String = e.Form.DropDownBox.Text
Dim tbl As Table = Tables("窗口1_Table1")
If txt = "" Then
Tables("窗口1_Table1").Filter = ""
Else
txt = "\'*" & txt & "*\'"
tbl.Filter = "客户ID Like " & txt & " Or 公司名称Like " & txt & " Or 地址Like
" & txt & " Or 联系人Like " & txt
End If
e.Form.DropDownBox.Select()

--  作者:有点甜
--  发布时间:2013/9/26 23:03:00
--  
 参考这个例子便可。


--  作者:asionwong
--  发布时间:2013/9/27 14:50:00
--  
 

按2楼方法未能实现,可能自己没做好,再述,望大神们帮忙,THANK YOU!

做了两个DropDownForm窗口:DropDownForm窗口1捆绑客户资料表,DropDownForm窗口2 捆绑出货单表,在录入窗口做了一个DropBOX框捆绑回款单的客户编码,在DropBOX框输入客户编码时,跳出DropDownForm窗口1进行模糊筛选(已完成)。

要求:DropBOX框的客户编码输好,DropDownForm窗口1关闭后,自动跳出DropDownForm窗口2 ,跳出的窗口2要精确筛选出出货单表里面的客户编码等于DropBOX框里客户编码,同时“结款”列等于“未结款”。

 

 


--  作者:Bin
--  发布时间:2013/9/27 14:58:00
--  
按照帮助如果没办法做,那么没人能说的比帮助更加详细了.

只能够把例子发上来,别人帮你写了.

--  作者:asionwong
--  发布时间:2013/9/27 16:39:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:success.table

上传了,麻烦大师们帮忙实现一下3楼的要求,谢谢
--  作者:Bin
--  发布时间:2013/9/27 16:51:00
--  
在哪个窗口,也不说详细一点.
--  作者:asionwong
--  发布时间:2013/9/27 17:00:00
--  

在回单窗口款窗口,筛选的时候要求在回款窗口弹出窗口3,3楼提到的DropDownForm窗口2 指的是附件的窗口3,筛选是在该窗口显示,不是表筛选

谢谢!


--  作者:asionwong
--  发布时间:2013/9/27 17:00:00
--  
回款窗口
--  作者:Bin
--  发布时间:2013/9/27 17:08:00
--  
你另外一个窗口不可以也是下拉窗口,另外你都没客户编号这个列啊.
--  作者:asionwong
--  发布时间:2013/9/27 17:12:00
--  
“客户编码”列有的,能帮我按3楼的要求做一下上传吗,因为学的时间不长,所以也是边学边做。