VB6: Aplicativo trava depois de compilado

Como vão todos?Estou puxando alguns dados através do DAO 3.6 e plotando em um gráfico MsChart.Quando estou executando o aplicativo em modo de desenvolvimento, ele puxa e plota os dados sem problemas.Quando compilo o aplicativo, ele trava e retorna um erro, apontando o dao360.dll.No relatório de erro do Windows XP diz o seguinte:"Assinatura do erroAppName: cdd.exe AppVer: 1.0.0.74 ModName: dao360.dll.......O que acham que pode estar ocorrendo?O código é simples assim:

Private Sub Form_Load()On Error Resume NextDim Consulta As RecordsetDim sSQL As StringDim ColunaAtual As IntegerDim PrimeiraData As StringMe.Left = (Screen.Width - Me.Width) / 2Me.Top = (Screen.Height - Me.Height) / 2PrimeiraData = DateAdd("d", -15, Now())Me.Caption = frmCDD.CELL & " - Estatística"sSQL = "select *, Day from tbl_dados where CELL='" & frmCDD.CELL & "' AND Day>#" & PrimeiraData & "# ORDER BY Day ASC"Set Consulta = MyDB2.OpenRecordset(sSQL)ColunaAtual = 1While Not Consulta.EOF 'Tráfego Grafico.Row = ColunaAtual Grafico.Column = 1 Grafico.Data = Consulta("[TRAFF FULL HMM]") Grafico.Column = 2 Grafico.Data = Consulta("[TRAFF HALF HMM]") Grafico.Column = 3 Grafico.Data = Consulta("[TRAFF HMM]") 'Legenda 1 Grafico.RowLabel = Day(Consulta("Day")) & "/" & Month(Consulta("Day")) 'Legenda 2 Grafico.Column = 1 Grafico.ColumnLabel = "FULL HMM" Grafico.Column = 2 Grafico.ColumnLabel = "HALF HMM" Grafico.Column = 3 Grafico.ColumnLabel = "HMM" ColunaAtual = ColunaAtual + 1 Consulta.MoveNextWendConsulta.CloseSet Consulta = NothingEnd Sub

O que acham? Alguma dica?Obrigado!