- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]如何用代码在指定表指定位置增加列（非临时列）？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=120392)
-- 发布时间：2018/6/14 10:07:00
-- [求助]如何用代码在指定表指定位置增加列（非临时列）？
各位老师：
我刚接触狐表，在设计一个小项目时，遇到一个小小的问题，一直解决不了：我在一个窗体中设计了一个按钮，希望可以在指定位置增加一列，不指定列名，可以调出系统设置列的格式，再输入列名，不能用ADD，因为不是临时列。下面是我的代码：
With Tables("境内飞机交通")
.Select(.RowSel, .Cols("备注").Index)
Syscmd.Column.InsertDataColumn()
End With
在运作时，有时可以顺利实现，但有时却跳到主窗口里增加了一列。
如何破？
-- 发布时间：2018/6/14 10:09:00
--
此主题相关图片如下：1.bmp
上图是按键所在表
此主题相关图片如下：2.bmp
上图为按了之后跳到主窗口增加了一列
-- 发布时间：2018/6/14 10:16:00
--
试试
dim t as table = Tables("表A")
maintable = t
t.Select(t.RowSel, t.Cols("第三列").Index)
t.Focus
Syscmd.Column.InsertDataColumn()
-- 发布时间：2018/6/14 10:20:00
--
谢谢老师！现在解决了。