How do I prevent multiple checked CheckBox Column in DataGrideView control?

Private Sub burning_status_view_CellContentClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles burning_status_view.CellContentClick

Dim status As Boolean = sender.rows(e.RowIndex).cells("select").value 

For Each row As DataGridViewRow In burning_status_view.Rows

If row.Cells("select").Value Then  row.Cells("select").Value = False

Next

End Sub