主题：[求助]筛选条件问题

请参考帮助 动态列表项目

1 在项目AfterOpenProject事件里写代码

Tables("商品").Cols("类别").Combolist = DataTables("型式").GetComboListString("类别")

2 在表属性DataColChanged 事件里写代码

Dim filter As String
filter= "类别 = '" &  e.DataRow("类别") &"'"
Tables("商品").Cols("型式").Combolist = DataTables("型式").GetComboListString("型式",filter)

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.table