http://www.vb-helper.com/HowTo/chkgrid.zip

	Purpose
Display checkboxes in an MSFlexGrid control

	Method
Display checked and unchecked pictures in the cells. When the user clicks on a cell, toggle the picture.

    ' Toggle the check box.
    Private Sub MSFlexGrid1_Click()
        If MSFlexGrid1.Col < 1 Or MSFlexGrid1.Row < 1 Then Exit Sub
    
        If MSFlexGrid1.CellPicture = picChecked Then
            Set MSFlexGrid1.CellPicture = picUnchecked
        Else
            Set MSFlexGrid1.CellPicture = picChecked
        End If
    End Sub

	Disclaimer
This example program is provided "as is" with no warranty of any kind. It is
intended for demonstration purposes only. In particular, it does no error
handling. You can use the example in any form, but please mention
www.vb-helper.com.
