List3框中有5列值，想选择转到list4中同样也要求有5列值，但是我只能转移过去两列值，不知为何？

[于之]

List3框中有5列值，想选择转到list4中同样也要求有5列值，但是我只能转移过去两列值，不知为何？

我的代码如下：
lncnt=1
lncnt1=thisform.list4.listindex

with thisform.list3
for I=1 TO .listcount

aa1=thisform.list3.list(I)
aa2=thisform.list3.list(I,2)
aa3=thisform.list3.list(I,3)
aa4=thisform.list3.list(I,4)
aa5=thisform.list3.list(I,5)

num=THISFORM.list4.LISTCOUNT
num=num+1
thisform.list4.COLUMNWIDTHS="50,80,80,100,200"

thisform.list4.addlistitem(aa1, num, 1)
thisform.list4.addlistitem(aa2, num, 2)
thisform.list4.addlistitem(aa3, num, 3)
thisform.list4.addlistitem(aa4, num, 4)
thisform.list4.addlistitem(aa5, num, 5)

.removeitem(I)
endfor
endwith

我的list3中转移到list4中只能过去两列值，而后面的3列值却不能过去，请问要如何改呢？谢谢！

[都市夜猫]

你的 list4 原来就只定义了 2 列吧，应该 >= 5 或者，复制到 list4 的代码前面加上

If thisform.list4.ColumnCount < thisform.list3.ColumnCount 
    thisform.list4.ColumnCount = thisform.list3.ColumnCount
Endif

[于之]

引用 1 楼 dkfdtf 的回复:

你的 list4 原来就只定义了 2 列吧，应该 >= 5 或者，复制到 list4 的代码前面加上

If thisform.list4.ColumnCount < thisform.list3.ColumnCount 
    thisform.list4.ColumnCount = thisform.list3.ColumnCount
Endif

哇，果真是这个原因，太厉害了！谢谢