DataGridview1 Colorata

Private Sub DataGridSettaColori()
' colora la DataGridView

With DataGridView1.ColumnHeadersDefaultCellStyle
.BackColor = Drawing.Color.Navy
.ForeColor = Drawing.Color.White
.Font = New Drawing.Font(DataGridView1.Font, Drawing.FontStyle.Bold)
End With
With DataGridView1.RowHeadersDefaultCellStyle
.BackColor = Drawing.Color.Navy
.ForeColor = Drawing.Color.White
.Font = New Drawing.Font(DataGridView1.Font, Drawing.FontStyle.Bold)
End With
With Me.DataGridView1.RowTemplate
.DefaultCellStyle.BackColor = Drawing.Color.Bisque
DataGridView1.AlternatingRowsDefaultCellStyle.BackColor = Drawing.Color.AntiqueWhite
End With
Dim style As New DataGridViewCellStyle
With style
.BackColor = Drawing.Color.Beige
.ForeColor = Drawing.Color.Brown
.Font = New Drawing.Font("Microsoft Sans Serif", 8.25, FontStyle.Bold)
End With
' Apply the style as the default cell style.

DataGridView1.AlternatingRowsDefaultCellStyle = style
End Sub