以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请问，代码写在什么位置，才能使每个包含相应的"入库表"、"出库表"的窗口中也能生效？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=137223)
--  作者：fengwenliuyan
--  发布时间：2019/7/1 10:59:00
--  请问，代码写在什么位置，才能使每个包含相应的"入库表"、"出库表"的窗口中也能生效？
Select Case MainTable.Name
    Case "入库表"
        Tables("入库表").Cols("客户").Combolist = DataTables("客户表").GetComboListString("客户")
    Case "出库表"
        Tables("出库表").Cols("客户").Combolist = DataTables("客户表").GetComboListString("客户")
End Select

请问，以上代码写在什么位置，才能使每个包含相应的"入库表"、"出库表"的窗口中也能生效？
--  作者：有点甜
--  发布时间：2019/7/1 11:05:00
--  

写在currentTableChanged事件，代码比如

 

If currentTable.cols.contains("客户") Then

    currentTable.Cols("客户").Combolist = DataTables("客户表").GetComboListString("客户")

End If