primero crear un nuevo objeto de tipo crystal report, pongamos que lo llamas "informe.rpt" indicándole que obtenga los datos de un dataset que tengas en el mismo proyecto
añades en un form un crystalreportsviewer que lo tienes en la barra de controles
si lo llamas "cr", para imprimir el report solo tienes que escribir este código:
Dim rep As New ReportDocument()
rep.Load("informe.rep") 'indicar la ruta completa
rep.SetDataSource(miDataset) 'cargar previamente el dataset
cr.ReportSource = rep
obviamente el problema radica mas en la creación del report que en la llamada a ese report pero creo que es lo mejor que hay