<asp:CheckBox id="CheckBox1" runat="server" OnCheckedChanged="Cheall"></asp:CheckBox> Public Sub Cheall(ByVal sender As Object, ByVal E As EventArgs) Dim i As Integer If CType(sender, CheckBox).Checked = True Then Dim H As CheckBox For i = 0 To Me.DataGrid1.Items.Count - 1 CType(Me.DataGrid1.Items(i).FindControl("CheckBox1"), CheckBox).Checked = CType(sender, CheckBox).Checked Next End If End Sub
在HTML代码中添加事件,设置AutoPostBack属性为trueCS文件中触发事件
public void che_CheckedChanged(object source, System.EventArgs e)
{
想要执行的代码
}
Public Sub Cheall(ByVal sender As Object, ByVal E As EventArgs)
Dim i As Integer
If CType(sender, CheckBox).Checked = True Then
Dim H As CheckBox
For i = 0 To Me.DataGrid1.Items.Count - 1
CType(Me.DataGrid1.Items(i).FindControl("CheckBox1"), CheckBox).Checked = CType(sender, CheckBox).Checked
Next
End If
End Sub