表格中添加组合框，关于组合框的数据源的有关问题
表格中添加组合框，关于组合框的数据源的问题。
为什么我这个组合框中的数据是空的？数组中我调试时是看到是有数据的啊。
------解决方案--------------------
注意数组变量的作用域，执行完你这段代码，数组就不存在了
要不就将数组放到 grid 的一个属性中，如：
- VB code
For i = 1 to ThisForm._grid1.ColumnCount
x = Transform(i)
With ThisForm._grid1.column&x.
.AddObject('cmb分公司','ComboBox')
Select dist 分公司 from YWJL into array arfgs
.CurrentControl = 'cmb分公司'
.Sparse = .T.
.cmb分公司.borderstyle = 0
.cmb分公司.visible = .T.
.cmb分公司.rowsourcetype = 5
.cmb分公司.rowsource = 'arfgs'
Endwith
Next
为什么我这个组合框中的数据是空的？数组中我调试时是看到是有数据的啊。
------解决方案--------------------
注意数组变量的作用域，执行完你这段代码，数组就不存在了
要不就将数组放到 grid 的一个属性中，如：
- VB code
ThisForm._grid1.AddProperty('arfgs[1]')
Select dist 分公司 from YWJL into array ThisForm._grid1.arfgs
For i = 1 to ThisForm.grid1.ColumnCount
...
.cmb分公司.rowsource = 'This.Parent.Parent.arfgs'
Next
------解决方案--------------------
你的代码不用改动，直接在你代码前面加一句：
Public Array arfgs(1)
------解决方案--------------------
楼主还是对VFP控件属性、方法、事件掌握的不够透彻。