Private Sub GridView1_RowCreated(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GridView1.RowCreated
If (e.Row.RowType = DataControlRowType.Header) Then
Dim row As TableRow = New GridViewRow(-1, -1, DataControlRowType.Header, DataControlRowState.Normal)
Dim cell As TableCell = New TableCell()
cell.ColumnSpan = GridView1.Columns.Count
cell.RowSpan = 1
cell.Text = "追加行！"
cell.HorizontalAlign = HorizontalAlign.Left
cell.Font.Bold = True
row.Cells.Add(cell)
GridView1.Controls(0).Controls.AddAt(0, row)
GridView1.ShowHeader = True
End If
End Sub