conexion dinamica de Reporte

sqlA.Fill(miDataSet, "Datos")
rep.SetDataSource(miDataSet)

Hola a todos

Estoy tratando de cambiar dinamicamente la conexion de un reporte hecho
con CrystalReports, este es el codigo que estoy usando y me dice que

"DataSourceException was unhandled

The report has no tables"

Es como si miDataSet.tables("Datos") no fuera una tabla <--


Dim miDataSet As New DataSet
Dim sqlA As New SqlDataAdapter
Dim objConnection As New SqlConnection(lineaC)
sqlA.SelectCommand = New SqlCommand("select * from Datos",
objConnection)
Dim mt As DataTable

Dim rep As New CrystalReport1



sqlA.Fill(miDataSet, "Datos")
rep.SetDataSource(miDataSet.tables("Datos"))

saludos
gracias de antemano