主题：[求助]自动列表项目

有两列：“产品名称”及“规格牌号”，希望填入“产品名称”后，“规格牌号”自动列出该产品的所有牌号规格

在该表的startedit事件中写入：

Tables("合同明细表").Cols("产品名称").ComboList = DataTables("产品资料表").GetComboListString("产品名称")
If e.Table.current("产品名称") IsNot Nothing Then
    e.Table.Cols("规格牌号").Combolist = DataTables("产品资料表").GetComboListString("规格牌号","产品名称= '" & e.Table.current("产品名称") & "'")
End If

该代码始终显示的是所有的规格牌号，好像没有进行筛选 啊