DataGrid中CheckBox的全选/取消全选

来源：互联网发布：html5游戏开发源码编辑：程序博客网时间：2024/04/29 17:30

关键代码

。aspx文件

<asp:datagrid id="DataGrid1" ......>
......

<Columns>
......

    <asp:TemplateColumn>
          <HeaderStyle HorizontalAlign="Center"></HeaderStyle>
          <HeaderTemplate>
                     审核<br>
                    <asp:CheckBox ID="ChkSelectAll" Runat="server" AutoPostBack="True" Text="全选" OnCheckedChanged ="OnChkSelectAll"></asp:CheckBox>
          </HeaderTemplate>
          <itemtemplate>
                       <asp:CheckBox Runat="server" Checked="False" ID="Check"></asp:CheckBox>
          </itemtemplate>
   </asp:TemplateColumn>
   ........

</Columns>

</asp:datagrid>

。aspx。vb文件

Public Sub OnChkSelectAll(ByVal sender As Object, ByVal e As System.EventArgs)
        Dim cbSelectAll As CheckBox = CType(sender, CheckBox)
        If cbSelectAll.ID = "ChkSelectAll" Then
            For Each dgi As DataGridItem In DataGrid1.Items
                Dim cbs As CheckBox = CType(dgi.FindControl("Check"), CheckBox)
                cbs.Checked = cbSelectAll.Checked
            Next
        End If
    End Sub