VB中怎么清空listview中的东西

用ListView.ListItems.Clear清空所有项目；用ListView.ColumnHeaders.Clear清空表头。

示例代码如下：

（1）新建一个VB6工程

（2）在Form1窗体布置一个ListView和一个Command

（3）窗体代码

Option Explicit

Private Sub Command1_Click()
    With ListView1

        ' 清空所有项目

        .ListItems.Clear

        ' 清空表头

        .ColumnHeaders.Clear
    End With
End Sub

Private Sub Form_Load()
    Dim itemX As ListItem
    With ListView1

        ' 详细列表方式显示
        .View = lvwReport

        '表头

        .ColumnHeaders.Add , , "品名"
        .ColumnHeaders.Add , , "产地"
        ' 添加项目
        Set itemX = .ListItems.Add(, , "苹果")
        itemX.SubItems(1) = "烟台"
        
        Set itemX = .ListItems.Add(, , "香蕉")
        itemX.SubItems(1) = "巴拿马"
        
        Set itemX = .ListItems.Add(, , "柑橘")
        itemX.SubItems(1) = "加洲"
    End With

    Command1.Caption = "清空ListView"
End Sub
（4）运行

点击“清空ListView”按钮后

全部清空就用一个语句就行了，就用listview.clear这样就能把LISTVIEW控件中的内容全部清空了。

ListView1.ListItems.Clear
ListView1.ColumnHeaders.Clear