prpareEdit事件,写如下代码
If e.Col.name = "第一列" Then e.Col.ComboList = DataTables("表A").GetComboListString("第一列", "第一列 not in ('" & e.Table.DataTable.GetComboListString("第一列").replace("|", "','") & "')")End If