Seguindo exemplos encontrados na web e até mesmo no stackoverflow eu preenchi o botão `btnGerarCSV` dessa forma.

    Protected Sub btnGerarCSV_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnGerarCSV.Click
         Dim sb As New StringBuilder
         Dim gv As New GridView
                Try
                    Page.Response.Clear()
                    Page.Response.Buffer = True
                    Page.Response.AddHeader("content-disposition", "attachment;Pedido_" & Session("ddlPedido") & ".csv")
                    Page.Response.Charset = ""
                    Page.Response.ContentType = "application/vnd.ms-excel"                
        
                    grdPedido.DataSource = Session("dtPedidosColetados")
                   
                    For i As Integer = 0 To grdPedido.Columns.Count - 1
                        'Adiciona separador por vírgula
                        sb.Append(grdPedido.Columns(i).HeaderText + ","c)
                    Next
                    'Adiciona nova linha
                    sb.Append(vbCr & vbLf)
        
                    For i As Integer = 0 To grdPedido.Rows.Count - 1
                        For j As Integer = 0 To grdPedido.Columns.Count - 1
                            'Adiciona separador por  vírgula
                            sb.Append(grdPedido.Rows(i).Cells(j).Text + ","c)
                        Next
                        'Adiciona nova linha
                        sb.Append(vbCr & vbLf)
                    Next
        
                    Response.Output.Write(sb.ToString())
                    Response.Flush()
                    Response.End()
        
                Catch ef As ThreadAbortException
                    Exit Try
                Catch ex As Exception
        
                End Try
        
            End Sub

A minha página funciona da seguinte forma: O usuário escolhe Data Inicial e Data Final e seleciona o botão buscar. Então o `grdPedido` é preenchido e exibido em tela. Após isso dois botões são exibidos, um para exportar para excel em planilha, que está funcionando corretamente e um botão para CSV.

Porém o que me acontece é que ao chegar na linha ` For i As Integer = 0 To grdPedido.Columns.Count - 1` o número de colunas é = 0, mesmo o grid retornando a consulta normalmente. 

Já alterei o código de diversas formas, mas cai sempre nesse mesmo problema.