如何在vb6.0中使用VsFlexGrid中的复选框？

Question

我正在开发一个表单来处理项目中的访问权限。 我使用VsflexGrid7.0和Vb6.0。 我认为当我在vsflexgrid（vsflexgrid1）中显示1（有访问权限）和0（没有）via复选框时会很好。

现在，我的问题是当我点击“插入访问权限”复选框时，如何控制它的值？

谢谢

Answer 1

只是查看过去的项目，似乎我添加了使用网格_Click事件自行初始化和维护值的代码，例如

Private Sub Grid1_Click()
  With Grid1
    If .Row > 0 Then  ' omit the header row
      If .Col = 0 Then  ' the checkbox column
        If .TextMatrix(.Row, .Col) = "0" Then
          .TextMatrix(.Row, .Col) = "1"
        Else
          .TextMatrix(.Row, .Col) = "0"
        End If
        DoEvents
      End If
    End If
  End With
End Sub