e
End Sub

''' &lt;summary&gt;
''' Toggles whether the grid's header has buttons or not
''' &lt;/summary&gt;
Private Sub chkHeaderButtons_Click()
   grdThis.HeaderButtons = (chkHeaderButtons.Value = Checked)
End Sub


''' &lt;summary&gt;
''' Toggles whether the icons are highlighted using the selection colour
''' when selected
''' &lt;/summary&gt;
Private Sub chkHighlightSelectedIcons_Click()
   grdThis.HighlightSelectedIcons = (chkHighlightSelectedIcons.Value = Checked)
   grdThis.Draw
End Sub

Private Sub