datagridview Checkbox 仿radiobutton

DataGridView内的CheckBox实现类似RadioButton的功能,可以同时取消,但不能同时选中.只有选中一个!!

    Dim flg As Boolean = True
    Private Sub DataGridView1_CellValueChanged(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellValueChanged

        If flg Then
            For i As Integer = 0 To Me.DataGridView1.RowCount - 1
                If i = e.RowIndex Then
                Else
                    If Me.DataGridView1.Rows(i).Cells("Column1").Value.ToString() <> "0" Then
                        flg = False
                        Me.DataGridView1.Rows(i).Cells("Column1").Value = "0"
                        flg = True
                    End If
                End If
            Next
        End If
    End Sub

 

 

flg主要是防止Me.DataGridView1.Rows(i).Cells("Column1").Value = "0"
改变时自己调用自己!!