以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  集合  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=120031)
--  作者：ljf
--  发布时间：2018/6/5 22:40:00
--  集合
如何表标题列标题集合到目录树
--  作者：有点蓝
--  发布时间：2018/6/5 22:57:00
--  
循环
--  作者：ljf
--  发布时间：2018/6/6 12:29:00
--  表标题列标题
这是表名和列名，我需要的是表标题列标题
--  作者：有点甜
--  发布时间：2018/6/6 14:28:00
--  

参考

 

Dim tab = basemainform.controls("MainPages")
For Each p As object In tab.tabpages
    output.show(p.text)
    For Each c As Col In Tables(p.name).cols
        output.show(c.caption)
    Next
Next