ListView renklendirin

İşte ben birkaç yıl boyunca çok kullanışlı bulduğum bir değişmeze verir. Listview sayıda sütun veya sütunları çok geniş olduğunda fonksiyonu bir liste görünümü alternatif iki renk çizgiler çiziyor, bu büyük ölçüde okuma kolaylaştırır.

 Public Sub colorearListView (ListView olarak ByRef listesi)
 As Integer Dim i
 1 - i list.Items.Count 0 = için
 I = Int (i / 2) * 2 Daha sonra ise
 list.Items.Item (i). BackColor = Color.White
 Başka
 list.Items.Item (i). BackColor = Color.LightGoldenrodYellow
 End If
 Sonraki
 list.FullRowSelect = True
 End Sub

Ben de sizin ihtiyaçlarınıza uygun ve aynı zamanda artırabilir çok az çaba ile eminim.

5 Responses to "bir ListView renklendirin" için

  1. cibernetiko diyor ki:

    mükemmel bir kod .. listview için çok daha profesyonel bir dokunuş verir .. teşekkürler

  2. NicoNqn diyor ki:

    Merhaba, çok iyi bir sayfa bana çok yardımcı oluyor, ama bir liste görünümü ile ilgili bir sorun var, Görsel 2005 kullanıyorum.
    Ben 2 sütun (Oda, Devlet) ve 2 satır (: Oda: 1 Durum: Meşgul, Oda: 2 Durum: Serbest vb gibi) var. Ben satır 1, sütun 1 olurdu odalarından biri devlet işgal altındaki hücre veya kırmızı boya olup olmadığını bana color.Solamente bu örnekte, kırmızı hücre durumu boyamak için cuaquier ihtiyacımız var.
    Bu kodu (lstGrilla.Items (satır). Alt kalemler (col). BackColor = Color.red) deneyin ama uzun başarısız
    Ben izah olabilir umuyoruz .. zaten çok teşekkür ederim gelen.!

  3. l_kamikaze_l diyor ki:

    cehaleti mazur .. ama kiero formun load olayında alt arayıp olarak değil .. Hehe Bana yardım edin! fa tarafından ..!

  4. Geronimo Fernandez diyor ki:

    Sadece bir parametre olarak listview adına geçmek zorunda işlevini kullanmak için:

    Private Sub Form1_Load (gönderici ....

    colorearListView (ListView1)

    End Sub

  5. Pako diyor ki:

    Merhaba,

    ListView rengini değiştirmek nasıl google Aradığınız burada alır :)

    Ben kodu sayesinde hizmet, ben optimize etmek için bir şeyler değişti ve bu sonucu oldu:

    Public Sub colorearListView (ListView olarak ByRef listesi)
    Renk = Color.FromArgb (0, 225, 239, 253) Dim Renk
    As Integer Dim i
    I için list.Items.Count 0 = - 1 Adım 2
    list.Items.Item (i). BackColor = renk
    Sonraki
    list.FullRowSelect = True
    End Sub

    Ve renkli çıktılar için:

    colorearListView (ListView1)

    Saygılar

Yorum