• DataGrid复杂表头的制作


          Private Sub DataGrid1_ItemCreated(ByVal sender As ObjectByVal e As System.Web.UI.WebControls.DataGridItemEventArgs) Handles DataGrid1.ItemCreated
            
    If e.Item.ItemType = ListItemType.Header Then
                e.Item.Cells(
    0).RowSpan = 2
                e.Item.Cells(
    1).RowSpan = 2
                e.Item.Cells(
    2).RowSpan = 2
                e.Item.Cells(
    3).ColumnSpan = 12
                e.Item.Cells(
    3).HorizontalAlign = HorizontalAlign.Center
                
    Dim TmpTd As String = "尺   码</td><td RowSpan = 2>总数</td> </tr>"
                TmpTd = TmpTd & "<tr><td  class=""Headstyle""  align=""center"" valign=""top"">24<br>99</td> 
    <td class=""Headstyle""  align=""center"" valign=""top"">25</td>"

                TmpTd = TmpTd & "<td class=""Headstyle""  align=""center"" valign=""top"">26<br>XS</td>  
    <td class=""Headstyle""  align=""center"" valign=""top"">27<br>S</td>"

                TmpTd = TmpTd & " <td class=""Headstyle""  align=""center"" valign=""top"">28<br>M</td>
    <td class=""Headstyle""  align=""center"" valign=""top"">29<br>L</td>"

                TmpTd = TmpTd & "<td class=""Headstyle""  align=""center"" valign=""top"">30<br>XL</td>
    <td class=""Headstyle""  align=""center"" valign=""top"">31<br> XXL</td>"

                TmpTd = TmpTd & "<td class=""Headstyle""  align=""center"" valign=""top"">32</td>
    <td class=""Headstyle""  align=""center"" valign=""top"">34</td>"

                TmpTd = TmpTd & "<td class=""Headstyle""  align=""center"" valign=""top"">36</td>
    <td class=""Headstyle""  align=""center"" valign=""top"">38</td></tr><tr><td>"

                e.Item.Cells(3).Text = TmpTd
                e.Item.Cells(
    4).Visible = False
                e.Item.Cells(
    5).Visible = False
                e.Item.Cells(
    6).Visible = False
                e.Item.Cells(
    7).Visible = False
                e.Item.Cells(
    8).Visible = False
                e.Item.Cells(
    9).Visible = False
                e.Item.Cells(
    10).Visible = False
                e.Item.Cells(
    11).Visible = False
                e.Item.Cells(
    12).Visible = False
                e.Item.Cells(
    13).Visible = False
                e.Item.Cells(
    14).Visible = False
                e.Item.Cells(
    15).Visible = False

            
    End If

    demo img Url: http://myx.name/demo/demoimg/GridHead.jpg 
  • 相关阅读:
    从零开始在阿里云服务器(Ubuntu)上部署Rails应用
    rspec使用
    ubuntu安装和配置SVN
    给asp:DropDownList追加项到顶层显示
    js生成、删除表格方法
    js验证
    GridView和CheckBox连用,实现全选
    javascript;css;firefox;ie;区别
    回调示例
    GridView联合CheckBox实现全选功能[百度空间搜集]
  • 原文地址:https://www.cnblogs.com/myx/p/37934.html
Copyright © 2020-2023  润新知