Que tal, Muchisimas Gracias por su ayuda, y si el codigo que me muestras es para llenar el DataSet pero desde una base de datos, y yo lo quiro llenar desde codigo, y encontre algo que me funciono ahora les muestro:
Código:
Dim ds As New MiData 'MiData se refiere a mi DataSet tipado
Dim dr As DataRow 'Mi variable fila
For i As Int16 = 0 To 20
dr = ds.Tables("MiTabla").NewRow() 'MiTabla es la tabla creada en el DataSet
dr("id") = "18568361" 'Le indico que quiero una nueva fila
dr("nombre") = "Daniel" 'y empiezo a llenar los campos
dr("apellido") = "Garcia"
dr("telefono") = "2736553"
ds.Tables("MiTabla").Rows.Add(dr) 'Aqui agrego la fila creada
Next i
DataView1.DataSource = ds.Tables("MiTabla") 'muestro en un datagridview
Dim reporte As MiReporte = New MiReporte() 'Mi variable reporte es el CrystalReport
reporte.SetDataSource(ds)
Form2.CrystalReportViewer1.ReportSource = reporte
Form2.Show() 'envio mi reporte para mostrarlo al usuario a otro formulario
Ya desde el CrystalReport solamente busco mi DataSet en agregar base de datos, listo me muestra los campos y los acomodo donde yo quiera, ya solo falta configurar el boton de Impresion del CrystalReportViewer para enviar la misma info a mi base MYSQL.
Saludos Gracias a todos.