以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  下拉列表选所有表名  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=123566)

--  作者:andyd
--  发布时间:2018/8/17 17:44:00
--  下拉列表选所有表名
For Each tb As Table In Tables   
    output.show(tb.name)
Next

用命令窗口执行可以显示所有表名,为啥

For Each tb As Table In Tables   
    Tables("授权表").Cols("表名").ComboList = tb.name
Next

1,为啥下拉表只有一个 授权表
2,如何下拉表显示除 授权表 外的所有表


--  作者:有点蓝
--  发布时间:2018/8/17 17:54:00
--  
dim s as string
For Each tb As Table In Tables   
    s = s & tb.name & "|"
Next
Tables("授权表").Cols("表名").ComboList = s.trim("|")