-------------------------------------------------------------------------------------------------------------------------------------------------------- Primeiramente obrigado por responder ,é o seguinte como demorou pra alguém me ajudar eu fui mexendo aqui e no relatório apareceu os campos que eu criei,mas no vb acho que o código está errado e eu não sei qual código colocar.Se puder me ajudar. Eu segui como estava no relatório e coloquei os campos procedente,setor e data fechamento todos com objeto text e coloquei um Ado com o nome sac para buscar informações no banco veja : With AdoSAC .Visible = False 'Estamos usando o Provedor para Jet 3.51 .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source= \\servidor\d\siglog\BancoDeDados\Banco.mdb" .RecordSource = "SELECT DISTINCT Setor FROM Sac where Setor = '" & DtGSAC.Columns(3).Text & "'" .EOFAction = adDoMoveLast .Mode = adModeReadWrite .Refresh End With Set txtSetor.DataSource = AdoSAC Set txtFechamento.DataSource = AdoSAC Set txtProcedente.DataSource = AdoSAC