Colorare il fondo di una riga di una GridView
Da Gambas-it.org - Wikipedia.
Versione del 21 apr 2020 alle 14:46 di Vuott (Discussione | contributi)
Per impostare il colore di fondo di una riga della GridView, si potrà adottare il seguente codice, che provvedere a colorare il fondo di una cella costituente la riga interessata:
Public Sub Form_Open() Dim b As Byte With GridView1 .Columns.Count = 4 .Rows.Count = 4 End With ' All'inizio la prima riga in alto assume il colore giallo: For b = 0 To GridView1.Columns.Max GridView1[0, b].Background = &FFFF00 Next End
oppure usando la proprietà ".Data.Background" nell'Evento "_Data( )" della GridView: [Nota 1]
Public Sub Form_Open() With GridView1 .Columns.Count = 4 .Rows.Count = 10 End With End Public Sub GridView1_Data(Row As Integer, Column As Integer) ' Vengono colorate di giallo soltanto le righe d'indice pari: If Row Mod 2 = 0 Then GridView1.Data.Background = &FFFF00 ' E' necessario usare anche la Proprietà ".Data.Text", se si vuole che le celle contenenti il testo vengano colorate: GridView1.Data.Text = "Testo qualsiasi" End
Note
[1] Questa soluzione è stata suggerita da Gianluigi, membro del forum gambas-it.org .