| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 这个代码能实现列出所有表格的列名吗 (http://foxtable.net/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
|