g multiple appearance properties
   grdThis.Redraw = False
   
   ' Set the colours:
   If (chkCustomColours.Value = Checked) Then
      grdThis.AlternateRowBackColor = RGB(86, 35, 87)
      grdThis.BackColor = RGB(72, 29, 73)
      grdThis.GridLineColor = RGB(150, 97, 153)
      grdThis.GridFillLineColor = grdThis.GridLineColor
      grdThis.ForeColor = RGB(155, 122, 158)
      grdThis.GroupingAreaBackColor = RGB(110, 46, 112)
      grdThis.GroupRowBackColor = RGB(135, 102, 138)
      grdThis.GroupRowForeC