Private Sub myGridView_RowDataBound(sender As Object, e As GridViewRowEventArgs)
'*** Checkbox ***'
Dim chkBox As Checkbox = CType(e.Row.FindControl("chkBox"),Checkbox)
IF Not IsNothing(chkBox) Then
IF e.Row.DataItem("ChkValue") = "1" Then
chkBox.Checked = True
Else
chkBox.Checked = False
End IF
End IF
End Sub