以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  动态列表筛选  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=60624)
--  作者：一笑
--  发布时间：2014/11/27 21:50:00
--  动态列表筛选
有两个组合框“汇总1”和“汇总2”，
在汇总的enter事件中输入：
Dim hz As WinForm.ComboBox = e.Form.Controls("汇总1")
hz.Combolist = "空时|地面|轮挡时间|总时间"
获得了列表项目。

在汇总2中也是相同的列表项目，但需进行筛选，排除在汇总1中已选择的项目，该如何写代码，谢谢！
Dim hz As WinForm.ComboBox = e.Form.Controls("汇总")
Dim hz2 As WinForm.ComboBox = e.Form.Controls("汇总2")
Dim h As String = " & hz.Value & " 
Dim h2 As String = " & hz2.Value & " 
Dim h3 As String = "空时|地面|轮挡时间|总时间" 
hz2.Combolist = ？
--  作者：有点甜
--  发布时间：2014/11/27 21:55:00
--  
hz2.Combolist = h3.Replace(hz.Text & "|", "").Replace("|" & hz.Text, "").Replace(hz.Text, "")