'呵呵,不客氣,應該謝謝 chyich() 和icyer ()
Private Sub DataGrid1_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DataGridItemEventArgs) Handles DataGrid1.ItemDataBound
If e.Item.ItemType = ListItemType.Header Then
e.Item.Cells(0).ColumnSpan = 3
e.Item.Cells(0).Text = "Category1</td><td align=center colspan=2>Category2</td></tr><tr style=""color:White;background-color:#0033cc;font-weight:bold;""><td>" + e.Item.Cells(0).Text
End If
End Sub