请教高手：
    本人在表格（grid）对象中，使用了check类型的列，在改变数据源的时候Column 中的Header还在，但check类型的丢了，VF6自动添加了Text类型：
this.grid1.recordsource='mx_'+bh99
iia=12
this.grid1.columncount=iia
this.grid1.column12.AddObject('check1','CheckBox')     && 添加复选框    表单中column12 是check1式的控件，改变数据源后，丢了只有用此命令加上。
this.grid1.column12.RemoveObject('text1')              &&这个 Text1 确实存在了！  表单中column12 是check1式的控件，变成了Text1了。
   想在 Column12.Check1.click  中填写代码：在点击check1列时刷新表单，怎么解决这个问题呢？

[此贴子已经被作者于2018-11-27 21:02编辑过]

想在 Column12.Check1.click  中填写代码：在点击check1列时刷新表单，怎么解决这个问题呢？ Colum12中没有Click方法程序，Column12.Check1.click 中有。
我用VF6.0。

[此贴子已经被作者于2018-11-27 20:56编辑过]

回复4楼：泉城飞狐：谢谢您，为什么ColumnCount=-1 呢？ 有什么好处？或避免 白框 什么的吗？

回复3楼，cayx：
   我用的VFP6.0  ，怎么用编程的方法派生个mycheckBox子类呢？  或在表单中生产一个MyCheckBox控件？
谢谢！
Define class myCheckBox As CheckBox
  top=0
  left=0
  Height=20
  Wdith=10
  Caption=""
  Procedure Click
   Thisform.refresh
  Endproc
 EndDefine
this.grid1.column12.AddObject('check1','MyCheckBox')
这是样行吗？

[此贴子已经被作者于2018-11-27 21:21编辑过]

请高手！

[此贴子已经被作者于2018-11-27 21:20编辑过]

问题解决，感谢cayx！
也谢谢 liuxingang28（ 泉城飞狐）！  改变数据源，一般都是不想改变表格的其它列属性的，只想改变数据显示。