主题：请教一个列表的问题

1、用代码设置下拉内容

http://www.foxtable.com/webhelp/scr/1457.htm

2、修改prepareEdit事件代码

If e.Col.name = "第三列" Then
    Dim s As String = e.Table.DataTable.GetComboListString("第三列").replace("|", "','")
    Dim str As String = DataTables("表B").GetComboListString("第一列", "第一列 not in ('" & s & "')")
    e.Col.ComboList = str
End If