Vb6 在运行时向listview添加项

Vb6 在运行时向listview添加项,vb6,listview,listviewitem,Vb6,Listview,Listviewitem,当我使用以下命令向listview添加新值时: Set lstView = ListView(0).ListItems.Add(, , txtName) lstView.ListSubItems.Add , , txtValue lstView.Refresh 唯一的问题是,这只会在listview中显示一个空白新行,您知道如何正确更新它吗 通常,我使用的是一个记录集,因此只需清除然后重新填充数据,但我需要用户能够向listview添加条目。然后,我将在listview

当我使用以下命令向listview添加新值时:

    Set lstView = ListView(0).ListItems.Add(, , txtName)
    lstView.ListSubItems.Add , , txtValue
    lstView.Refresh
唯一的问题是,这只会在listview中显示一个空白新行,您知道如何正确更新它吗

通常,我使用的是一个记录集,因此只需清除然后重新填充数据,但我需要用户能够向listview添加条目。然后,我将在listview中循环,仅在用户完成修改listview后才将值添加到DB中


提前感谢您的帮助。

假设您的ListView的.View属性设置为“Report”,下面将向控件添加几行并设置子项文本

Dim li As ListItem

With ListView1
    .ColumnHeaders.Add , , "One"
    .ColumnHeaders.Add , , "Two"
    .ColumnHeaders.Add , , "Three"

    Set li = .ListItems.Add(, , "Row1Item1")
    li.SubItems(1) = "Row1Item2"
    li.SubItems(2) = "Row1Item3"

    Set li = .ListItems.Add(, , "Row2Item1")
    li.SubItems(1) = "Row2Item2"
    li.SubItems(2) = "Row2Item3"
End With

这与我在问题中已经拥有的代码没有什么不同,如果我阅读正确的话?我的问题是,如果我想在以后添加另一行数据,则该行数据不会显示在listview中,它不会自动更新。第一行代码是初学者的主要教育家--将View属性设置为Report。感谢您的帮助忽略我这是由于一个不相关(似乎)的问题,该问题现已解决。前面的海报列出了向ListView添加项目的正确方法,正如我问题中的原始代码一样。