以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  这个代码能实现列出所有表格的列名吗  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=65368)

--  作者:jhq1989
--  发布时间:2015/3/14 14:41:00
--  这个代码能实现列出所有表格的列名吗
Dim lm As String =""
For Each b As Col In DataTables.
  lm &= b.Name & "|"
Next

--  作者:Bin
--  发布时间:2015/3/14 14:44:00
--  

Dim lm As String =""
For Each dt As DataTable In DataTables
    For Each b As DataCol In dt.DataCols
        lm &= b.Name & "|"
    Next
Next
messagebox.show(lm)

--  作者:jhq1989
--  发布时间:2015/3/14 14:58:00
--  

能否让他显示出某表的某列名“表a。列名”


--  作者:Bin
--  发布时间:2015/3/14 15:01:00
--  
For Each dt As DataTable In DataTables
    For Each b As DataCol In dt.DataCols
        lm &= dt.name & "." & b.Name & "|"
    Next
Next