(21/05/2015, 10:08)alpeki99 yazdı: Normalde bir konuda birden fazla soru olduğu zaman cevap vermem ancak sizi az çok bilip suistimal etmeyeceğinizi düşünerek cevaplıyorum.

Private Shared Sub Arama_Yap_Olmayanlari_Sil(ByVal ListView_Adi As ListView, ByVal Aranacak_TextBox As String)

       ListView_Adi.Items.Clear()
       Dim ara As String = Aranacak_TextBox.ToLower()
       For Each item As ListViewItem In ListView_Adi.Items

           If item.SubItems(1).Text.ToLower().Contains(ara) = True Then
               item.Selected = True
           Else
               item.Remove()
           End If
       Next
   End Sub

Private Sub DRm_TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged

       RichTextBox1.Text = ""
       Arama_Yap_Olmayanlari_Sil(ListView1, TextBox1.Text)
   End Sub


Bu sorum için ek yapmak istiyorum, sakıncası yoksa

Bu şekilde listvievde arama yaptırıp olanları listeliyorum. Fakat senin yazdığında bu çalışmadı. Kodu nasıl revize edebilirim. Diyecektim.