Differenze tra le versioni di "Colorare il fondo di una riga di una GridView"
Da Gambas-it.org - Wikipedia.
Riga 15: | Riga 15: | ||
End | End | ||
− | oppure usando la Proprietà ".Data.Background" nell'Evento "_Data()" della ''GridView'': | + | oppure usando la Proprietà ".Data.Background" nell'Evento "_Data()" della ''GridView'': |
Public Sub Form_Open() | Public Sub Form_Open() | ||
Riga 28: | Riga 28: | ||
Public Sub GridView1<FONT Color=#B22222>_Data</font>(Row As Integer, Column As Integer) | Public Sub GridView1<FONT Color=#B22222>_Data</font>(Row As Integer, Column As Integer) | ||
− | <FONT Color=gray>' ''Vengono colorate di giallo soltanto le righe d'indice pari:''</font> | + | <FONT Color=gray>' ''Vengono colorate di giallo e popolate dal testo soltanto le righe d'indice pari:''</font> |
− | If Row Mod 2 = 0 Then GridView1.Data.Background = &FFFF00 | + | If Row Mod 2 = 0 Then |
− | + | With GridView1.Data | |
− | + | .Background = &FFFF00 | |
− | + | .Text = "Testo qualsiasi" | |
+ | End With | ||
+ | Endif | ||
End | End | ||
− | |||
− | |||
− | |||
− | |||
− |
Versione attuale delle 12:50, 2 lug 2023
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:
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 e popolate dal testo soltanto le righe d'indice pari: If Row Mod 2 = 0 Then With GridView1.Data .Background = &FFFF00 .Text = "Testo qualsiasi" End With Endif End