Differenze tra le versioni di "Assegnare colori allo sfondo ed al testo di una riga selezionata di una ListView"

Versione delle 10:58, 17 set 2019

Impostata la chiave identificatrice dell'Item della ListView, è possibile assegnare colori allo sfondo ed al testo della riga selezionata di un oggetto ListView.

Mostriamo un esempio pratico:

 Public Sub Form_Open()
 
 With ListView1
   .Add("1", "Riga_1")
   .Add("2", "Riga_2")
   .Add("3", "Riga_3")
   .Add("4", "Riga_4")
   .Add("5", "Riga_5")
   .Add("6", "Riga_6")
   .Add("7", "Riga_7")
 End With
 
End


Public Sub ListView1_Select()
 
 Dim s As String
 
' Assegna i colori predefiniti allo sfondo e al testo di ciascuna riga della "ListView":
 For Each s In ListView1.Keys
   ListView1[s].Background = Color.TextBackground
   ListView1[s].Foreground = Color.TextForeground
 Next
 
' Assegna il colore blu allo sfondo e giallo al testo presente nella corrente riga cliccata della "ListView":
 With ListView1.Current
   .Background = Color.Blue
   .Foreground = Color.Yellow
 End With
 
End