Listview只有两列数据，如何将其存入二维数组。

zhuozhuo2011 2013-05-23 11:16:23

如题，具体那两个循环的代码是怎样的？谢谢

...全文

101 6 打赏收藏转发到动态举报

写回复

用AI写文章

6 条回复

切换为时间正序

请发表友善的回复…

发表回复

worldy 2013-05-23

打赏
举报

dim a() as string redim a(lv.listitems.count-1,1)'Lv列表控件名称 for i=0 to lv a(i,0)=lv.listitems(i).text a(i,1)=lv.listitems(i).subitems(1) next

zhuozhuo2011 2013-05-23

打赏
举报

引用 4 楼 worldy 的回复:

代码有错 dim a() as string redim a(lv.listitems.count-1,1)'Lv列表控件名称 for i=1 to lv.listitems.count a(i-1,0)=lv.listitems(i).text a(i-1,1)=lv.listitems(i).subitems(1) next

改好了： redim a(lv.listitems.count-1,1)'Lv列表控件名称改为： redim a(0 to lv.listitems.count-1,0 to 1)'Lv列表控件名称谢谢！！！

zhuozhuo2011 2013-05-23

打赏
举报

引用 4 楼 worldy 的回复:

代码有错 dim a() as string redim a(lv.listitems.count-1,1)'Lv列表控件名称 for i=1 to lv.listitems.count a(i-1,0)=lv.listitems(i).text a(i-1,1)=lv.listitems(i).subitems(1) next

这只是两列两行啊，我想要的是两列，行数待定啊，这只有两行？

worldy 2013-05-23

打赏
举报

代码有错 dim a() as string redim a(lv.listitems.count-1,1)'Lv列表控件名称 for i=1 to lv.listitems.count a(i-1,0)=lv.listitems(i).text a(i-1,1)=lv.listitems(i).subitems(1) next

worldy 2013-05-23