写在currentTableChanged事件,代码比如
If currentTable.cols.contains("客户") Then
currentTable.Cols("客户").Combolist = DataTables("客户表").GetComboListString("客户")
End If