Question

我有一个问题，当我在listview中添加一个子项时，所有子项都会出现在每个列中，我要做的是有4列，结果在每列垂直向下，我要去发布我用于其中一列的代码，以免在此处有太多废话。

    Dim source As String = (New Net.WebClient).DownloadString("http://arma.newagerp.com/bb.php")

    ListView1.Columns.Add("Deaths")

    Dim formula2 As String = "<td><div class='deaths'>([^<]*)</td></div>"

    Dim item2 As New ListViewItem("item2", 1)

    For Each item As Match In (New Regex(formula2)).Matches(source)
        item2.SubItems.Add(item.Groups(1).Value)
    Next

    ListView1.Items.AddRange(New ListViewItem() {item2})

如果您想要更多代码，请告诉我，但这是有效的，其他3只是相同的，其他3只是同一列表视图中的玩家名称，得分和时间。

Answer 1

如果我正确理解你的问题，你想在将值传递给所有四列之后添加下一行吗？如果这是正确的，那么看看下面的示例代码。

While (Condition) 
Dim objItem As ListViewItem
            objItem = lv_Details.Items.Add("")
            With objItem
                .SubItems.Add("")
                .SubItems.Add("")
                .SubItems.Add("")
                .SubItems.Add("")
            End With
End While

希望这会有所帮助。：）

ListView子项和列

1 个答案: