用字典先处理，再引用
Dim dic As new Dictionary(Of String, String)For Each c As Col In Tables("统计表").Cols dic.Add(c.Caption, c.name)Next
然后这样获取列名
Tables("窗口1_Table1").Cols(dic("张三")).Width = 50
加好友 
发短信
Post By：2017/8/7 9:20:00 [显示全部帖子]
