本帖最后由 unsv29mj 于 2010-03-26 13:48:32 编辑

解决方案 »

  1.   

    ListView1.ListItems(行).SubItems(列)=XXX
      

  2.   

    ListView1.ListItems(123).text=" "
    ……
    ListView1.ListItems(123).SubItems(567-1)=0也可以用
    ListView1.ListItems(123).listSubItems(567-1)=0你的ColumnHeader要有567个
      

  3.   

    Private Sub Form_Load()'行、列、子项要先添加好
    ListView1.View = lvwReport
    For I = 1 To 10
    ListView1.ColumnHeaders.Add , , "第" & I & "列"
    Next
    For I = 1 To 10
    ListView1.ListItems.Add , , "第" & I & "行"
    For j = 1 To 10
    ListView1.ListItems(I).ListSubItems.Add , , ""
    Next
    Next
    ListView1.ListItems(2).ListSubItems(5).Text = 0
    ListView1.ListItems(4).ListSubItems(3).Text = 404
    ListView1.ListItems(10).ListSubItems(2).Text = 102
    End Sub