合併gv欄位
Protected Sub GridView1_PreRender(ByVal sender As Object, ByVal e As System.EventArgs) Handles GridView1.PreRender 
Protected
For i As Integer = 0 To Me.GridView1.Rows(0).Cells.Count - 1 Dim n As Integer = 1 For j As Integer = 0 To Me.GridView1.Rows.Count - 1 If j > 0 Then If Me.GridView1.Rows(j).Cells(i).Text = Me.GridView1.Rows(j - n).Cells(i).Text Then Me.GridView1.Rows(j).Cells(i).Visible = False Me.GridView1.Rows(j - n).Cells(i).RowSpan += 1 n += 1 Else Me.GridView1.Rows(j).Cells(i).RowSpan = 1 n = 1 End If Else Me.GridView1.Rows(j).Cells(i).RowSpan = 1 End If Next Next 
End Sub