Protected Sub myDataGrid_ItemDataBound(ByVal sender As Object, ByVal e As DataGridItemEventArgs) Handles myDataGrid.ItemDataBound
'*** Check Delete ***'
Dim chkDel As CheckBox = CType(e.Item.FindControl("chkDel"), CheckBox)
Dim txtCustomerID As CheckBox = CType(e.Item.FindControl("txtCustomerID"), Textbox)
If Not IsNothing(chkDel) Then
With chkDel
chkDel.Attributes.Add("OnClick", "document.form1." & txtCustomerID.ClientID & ".value = '" & chkDel.ClientID & "'")
End With
End If
End Sub