Colorare la griglia della GridView

Come è noto, il colore delle linee che costituiscono la griglia interna dell'Oggetto GridView è fisso: sempre grigio. Non v'è una Proprietà diretta della GridView che possa cambiare il colore delle linee che distinguono le varie celle della GridView.

Si può ottenere, comunque, questo risultato, usando l'Evento "_Data()" e operando sulla Proprietà ".Border" della GridView.

In tal caso avremo ad esempio:

Private Gridview1 As GridView


Public Sub Form_Open()

 With Me
   .W = 400
   .H = 400
   .Padding = 5
   .Arrangement = Arrange.Fill
 End With

 With GridView1 = New GridView(Me) As "Gridview1"
   .Columns.Count = 4
   .Rows.Count = 4
' Nascondiamo le linee preimpostate della "GridView": ' [nota 1]
   .Grid = False
 End With

End


Public Sub GridView1_Data(Row As Integer, Column As Integer)

' Impostiamo le linee di ciascuna cella (e quindi creiamo le Colonne) della "GridView":
With GridView1[row, Column].Border = New Border
  .Style = .Plain
  .Color = Color.Purple
  If Column < GridView1.Columns.Count Then .LeftStyle = .None
  If row < GridView1.Rows.Max Then .BottomStyle = .None
End With

End

Note

[1] Al riguardo vedere la seguente pagina: Nascondere le linee della griglia di una GridView