下面是这段代码,作用是要添加一个新列, 然后为该列指定一个新的名字。红色部分是我看不懂的地方!
疑问是“THISFORM.Grid1.ColumnCount”返回值应是表格总的数目，那么“NAME属性”更改的也应是最后一个列。
可是运行后更改的是新加的一列。
请各位指教!!!!
为此我还专门做了一实验：建立一个表单，添加一个表格控件和一个命令按钮控件，命令按钮代码如下。

THISFORM.Grid1.AddColumn(1) && Insert column at left.
THISFORM.Grid1.Columns(THISFORM.Grid1.ColumnCount).Name = "NewColumn"
THISFORM.Grid1.NewColumn.ControlSource = "Customer.CustID"

命令按钮代码：
MESSAGEBOX("添加前的列数："+ALLTRIM(STR(THISFORM.Grid1.ColumnCount)))&&显示为5列
THISFORM.Grid1.AddColumn(1) && Insert column at left.
MESSAGEBOX("添加后的列数："+ALLTRIM(STR(THISFORM.Grid1.ColumnCount)))&&显示为6列

THISFORM.Grid1.Columns(THISFORM.Grid1.ColumnCount).Name = "NewColumn"
THISFORM.Grid1.Columns(THISFORM.Grid1.ColumnCount).header1.caption = "■■■"&&新列的标题
THISFORM.Refresh
MESSAGEBOX("刷新后的列数："+ALLTRIM(STR(THISFORM.Grid1.ColumnCount)))&&好象没执行

可能新添加的列表面上是在指定的位置,但在内部是最后一列吧

猜的

正如你说的，我又把实验代码做了一下，果然如你说的，运行后新列在表格中显示为加在了指定列的前面，但新列的COLUMNORDER属性为最后一列加1，但按照中文帮助手册的说明，可不象我们想象的那样，也不符合事实，难到是帮助手册写错了，或翻译错了！！！
“调用 AddColum() 时, 已存在的列向右移动, 它们的 ColumnOrder 属性依次递增。表格的 ColumnCount 属性也加一。表格的控件属性数组扩大一个元素, 一个新列的引用放入新元素中。新列被分配一个唯一名。例如, 要添加一个新列, 然后为该列指定一个新的名字, 可按下述方法进行。”
THISFORM.Grid1.AddColumn(1) && Insert column at left.
THISFORM.Grid1.Columns(THISFORM.Grid1.ColumnCount).Name = "NewColumn"
THISFORM.Grid1.NewColumn.ControlSource = "Customer.CustID"

TO songyuyu
我已经把中文手册发给你了，请你尽快查收，并在搜索中查找“ADDCOLUMN”然后查看这段说明，看看有没有问题！！！谢谢！！

帮助那应该不会错的

添加新列"在表格的控件属性数组扩大一个元素" 也就是在数组的后面插入一个元素,在内部的位置就

是"THISFORM.Grid1.ColumnCount" 但在表单上插在指定的位置上,我想就是这样的

没有收到9.0的

[此贴子已经被作者于2007-5-17 9:08:15编辑过]