http://www.dotblogs.com.tw/mis2000lab/archive/2008/04/24/3451.aspx
密技第二份,GridView合併儲存格
......這功能很多人在問,應該也有很多解答了。不過,大家交流一下也無妨。
以下是我在微軟MSDN論壇的一些討論,都有我自己改寫的程式碼。僅供大家參考。
http://forums.microsoft.com/MSDN-CHT/ShowPost.aspx?PostID=2688678&SiteID=14
===========================================================
2008/9/2補充:
這個範例最特別的地方,就是它是執行期間(Runtime)才會完成。一開始您在VS 2005/2008/2010的設計畫面上,什麼都看不見。
因為GridView先天上無法合併表頭(Header)、合併儲存格.....等等,所以我們必須寫程式來產生這些特殊表頭。在程式被執行的期間,也就是 GridView的RowCreated事件 or PreRender事件裡面,這種特殊的「合併畫面」才會產生。
對讀者來說,以前都是在HTML畫面上,先把GridView設定好。而這個範例是讀者進入「執行期間」動態產生GridView細節的第一個程式,請您耐心體會。
Protected Sub GridView1_PreRender(ByVal sender As Object,ByVal e As System.EventArgs) Handles GridView1.PreRender
'==參考資料: http://epaper.blueshop.com.tw/board/show.asp?subcde=BRD20061225110536B4G&fumcde=FUM20050124192253INM
Dim i As Integer = 1
DimAlternatingRowStyle_i As Integer = 1
Dim mySingleRow As GridViewRow
For Each mySingleRow In GridView1.Rows
If CInt(mySingleRow.RowIndex) = 0 Then
mySingleRow.Cells(0).RowSpan = 1
mySingleRow.Cells(1).RowSpan = 1
mySingleRow.Cells(2).RowSpan = 1
mySingleRow.Cells(3).RowSpan = 1
Else
If mySingleRow.Cells(0).Text.Trim() = GridView1.Rows(CInt(mySingleRow.RowIndex)- i).Cells(0).Text.Trim() Then
GridView1.Rows(CInt(mySingleRow.RowIndex) - i).Cells(0).RowSpan += 1
i = i + 1
mySingleRow.Cells(0).Visible = False
Else
'----- 自己寫程式來處理AlternatingRowStyle的功能 -------------------
If (AlternatingRowStyle_i Mod 2) <> 0 Then
GridView1.Rows(CInt(mySingleRow.RowIndex)).Cells(0).BackColor = Drawing.Color.Orange
End If
AlternatingRowStyle_i += 1
'----------------------------------------------------------------
GridView1.Rows(CInt(mySingleRow.RowIndex)).Cells(0).RowSpan = 1
i = 1
End If
End If
Next
End Sub
相關文章,可以參考其他網友的作品,GridView 表頭合併儲存格( 上下左右都要合併..)
已經發表的相關「密技」,請看---- http://www.dotblogs.com.tw/mis2000lab/Tags/%e5%af%86%e6%8a%80/default.aspx
此範例已經收錄在書籍裡面出版了。請看: ASP.NET 案例精编 / 清华大学出版社
....................................................................................................寄信给我 mis2000lab (at)雅虎.com.台湾 ........
ASP.NET案例精编(清华大学出版社 / 作者MIS2000Lab)
http://www.china-pub.com/46063
2009/5/15上市
市场价 :¥59.80 RMB(人民幣)