Dim i As Int32
Dim cb As CheckBox
Dim n As Int32 = MyDataGrid.Items.Count - 1
For i = 0 To n
cb = CType(MyDataGrid.Items(i).Cells(1).FindControl("chkDelete"), CheckBox)
If cb.Checked = True Then
strupdate = "delete T_CARD where ID ='" & MyDataGrid.Items(i).Cells(0).Text() & "'"
comm = New SqlCommand(strupdate, objcn)
objcn.Open()
comm.ExecuteNonQuery()
objcn.Close()
Next
BindGrid()