[SOLUCIONADO] Crystal report y vb net 2013

[castevo]

Hola:

Alguien sabe como hacer para que crystal report muestre los datos de mi bd en sql server, ya que al momento de generar el reporte solo me muesta los encabezados.

Código vb:

Private Sub btn_remitente_Click(sender As Object, e As EventArgs) Handles btn_remitente.Click
        Dim rpt As New reporte
        Dim formulario As New generar_reporte
 
        consulta = "SELECT nombre, direccion, ciudad, cp, rfc from clientes WHERE idcliente = '" & txt_idremitente.Text & "'"
        Call query(consulta)
        dtu.Clear()
        adaptador.Fill(dtu, "Clientes")
 
        rpt.SetDataSource(dtu)
        formulario.CrystalReportViewer1.ReportSource = rpt
        formulario.CrystalReportViewer1.Dock = DockStyle.Fill
 
        Dim frmreporte As New Form()
 
        With frmreporte
            .Controls.Add(formulario.CrystalReportViewer1)
            .Text = "Reporte de Remitente"
            .WindowState = FormWindowState.Maximized
            .ShowDialog()
        End With
 
    End Sub
 

Saludos.