以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  获取列名设为数组  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=59158)

--  作者：shanmao --  发布时间：2014/10/30 10:04:00 --  获取列名设为数组 我想获取A表的所有列，然后把这些列变为数组。代码怎么写？

--  作者：有点甜 --  发布时间：2014/10/30 10:10:00 --    直接就能获取啊。 Tables("表A").Cols

--  作者：shanmao --  发布时间：2014/10/30 10:13:00 --   不行

--  作者：有点甜 --  发布时间：2014/10/30 10:15:00 --    你想做什么啊，直接说

--  作者：shanmao --  发布时间：2014/10/30 10:16:00 --   不好意思，可以了，但是我想把这些列名转为数组。

--  作者：有点甜 --  发布时间：2014/10/30 10:21:00 --   Dim t As Table = Tables("表A") Dim ary(t.Cols.Count) As Col For Each c As Col In t.Cols     ary(c.Index) = c Next msgbox(ary(0).name)