zoukankan      html  css  js  c++  java
  • 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 
  • 相关阅读:
    十大佛教经典语,你最中意哪一句
    哲理人生名句, 拿个本子记下来
    逸乐有节 不可过度
    教你怎么用59秒就能打动客户?
    爱的意义
    一个聪明女人写的日记(转)
    做人做事十三条铁则
    爱上一个人的7个征兆
    办公室白领须知的18个定律
    生活智慧:奇特的人生法则
  • 原文地址:https://www.cnblogs.com/myx/p/37934.html
Copyright © 2011-2022 走看看