以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]将列内容去除重复值后显示在窗口组合框中的代码 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=134010) |
-- 作者:hanzhang98 -- 发布时间:2019/4/25 11:20:00 -- [求助]将列内容去除重复值后显示在窗口组合框中的代码 老师好。想将窗口副本“窗口1_Table1”表的“所属期间”列去除重复后的值显示在窗口组合框中,但下面的代码错误。请老师帮助指导。谢谢。 e.Form.Controls("ComboBox1_Page13_Cx").Text = Tables("系统管理_Table1_Page13").RepeatFilter("所属期间", 1) [此贴子已经被作者于2019/4/25 11:45:55编辑过]
|
-- 作者:有点甜 -- 发布时间:2019/4/25 13:20:00 -- 参考
http://www.foxtable.com/webhelp/scr/1435.htm
|
-- 作者:hanzhang98 -- 发布时间:2019/4/25 15:39:00 -- 老师好。按老师的指导,已经获取到列表的值,但如何用代码将获取到的值变为组合框的自定义列表项。 [此贴子已经被作者于2019/4/25 16:27:42编辑过]
|
-- 作者:有点蓝 -- 发布时间:2019/4/25 15:48:00 -- 参考:http://www.foxtable.com/webhelp/scr/0925.htm |
-- 作者:hanzhang98 -- 发布时间:2019/4/25 16:27:00 -- 老师好。上面的问题已解决,谢谢老师指导。 再请教老师,下面的代码是对窗口表【Tables("窗口1_Table1")】的全表进行筛选。现在想变为只对其当前加载(或显示)的内容进行筛选。也就是当前内容是已经用筛选目录树筛选出来的,下面的代码想修改为只对现在显示的内容进行筛选,而不是对全表进行筛选。请老师帮助。谢谢。 Dim Ssqj As WinForm.ComboBox = e.Form.Controls("ComboBox1_Page13_Cx") Dim txt As String = Ssqj.value Dim tbl As Table = Tables("窗口1_Table1") If txt = "" Then tbl.Filter = "" Else txt = "\'*" & txt & "*\'" tbl.Filter = "所属期间 Like " & txt End If |
-- 作者:有点蓝 -- 发布时间:2019/4/25 16:51:00 -- tbl.Filter = IIF(tbl.Filter > "",tbl.Filter & " and ","") & "所属期间 Like " & txt |
-- 作者:hanzhang98 -- 发布时间:2019/4/25 17:21:00 -- 谢谢老师指导。 |