怎样循环提取listview中的数据

解决方案 »

  1.   

    dim Litem as listitem
    dim i as integer
    dim str as string 
    for i=0 to listview1.items.count-1
       set litem=listview1.items(i)
       str=litem.text
        for j=0 to Litem.subitems.count-1
            str=str+ litem.subitems(i) 
        next
        msgbox str
    next
      

  2.   

    '改
    dim i as integer,j as integer
            str=str+ litem.subitems(j)