vb.NET 导出EXCEL有问题

Question

    ' 重写此方法，确保在程序运行时，指定的GridView控件总是位于<from runat="server">标记内
    Public Overloads Sub VerifyRenderingInServerForm(ByVal control As Control)    End Sub
    '导出ＥＸＣＥＬ
    Public Sub Export(ByVal FileType As String, ByVal FileName As String)
        Response.Charset = "GB2312"
        Response.ContentEncoding = System.Text.Encoding.UTF7
        Response.AppendHeader("Content-Disposition", "attachment;filename=" & HttpUtility.UrlEncode(FileName, Encoding.UTF8).ToString())
        Response.ContentType = FileType
        EnableViewState = False
        Dim tw As StringWriter = New StringWriter()
        Dim hw As HtmlTextWriter = New HtmlTextWriter(tw)
        GridViewEx1.RenderControl(hw)
        Response.Write(tw.ToString())
        Response.End()
    End Sub
 
    Protected Sub Button5_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button5.Click
        Export("application/ms-excel", "商品信息表.xls")
    End Sub怎么报错 类型“GridViewEx”的控件“GridViewEx1”必须放在具有 runat=server 的窗体标记内。 
行 127:        Dim tw As StringWriter = New StringWriter()
行 128:        Dim hw As HtmlTextWriter = New HtmlTextWriter(tw)
行 129:        GridViewEx1.RenderControl(hw)
行 130:        Response.Write(tw.ToString())
行 131:        Response.End()