0

これは非常に簡単なようですが、私は今これについて問題を抱えています。

私がやりたいのは、リストビューの2番目の列で特定のエントリを探し、その特定のエントリが見つかった場合は、そのエントリが見つかった行を削除することです。

これが私のコードです:

      Dim lvSubItems As ListViewItem.ListViewSubItem

      For Each lvSubItems In lvConnectedClients.Items(lvConnectedClients.Items.Count - 1).SubItems

            If lvSubItems.Text = CType(clientSocket.Client.RemoteEndPoint, IPEndPoint).Address.ToString Then

                  ' This is not the correct way.
                  lvConnectedClients.Items.Remove(lvSubItems)

            End If

      Next

前もって感謝します!

4

2 に答える 2

0

あなたは正しい方向に進んでいると思います。以下は私にとってはうまくいきます(「AsListViewItem」を追加)。お知らせ下さい。

For Each li As ListViewItem In ListView1.Items

        If li.Text = "test 7" Then

        ListView1.Items.Remove(li)

        End If

Next

アイテムを作成するための私のコード:

Dim i As Integer = 0

    For i = 0 To 9

        Dim li As New ListViewItem("test " & i)


        ListView1.Items.Add(li)


    Next
于 2013-01-16T22:16:47.437 に答える
0
 For Each lvSubItems As Object In ListView1.Items
            If lvSubItems.Text = "test" Then
                ListView1.Items.Remove(lvSubItems)
            End If
 Next

また

For Each lvSubItems As ListViewItem In ListView1.Items

        If lvSubItems.SubItems(1).Text = "1" Then
            ListView1.Items.Remove(lvSubItems)
        End If
    Next
End Sub
于 2013-01-16T22:25:16.843 に答える