'CrystalReport->Control de Crysrtal Report
'Paso 1
CrystaReport1.DataFiles(0) = Base 'Aqui pones la ruta de tu BD ej.
DataFiles(0)="C:\Escolar\MiBase.mdb"
'Paso 2
CrystaReport1.SelectionFormula = "" 'Esta es Formúla que permite seleccionar todo
'Paso3
CrystaReport1.ReportFileName = Ruta & "Reporte.rpt" ' Esto es para ubicar el reporte. ej. ReportFileName ="C:\Escolar\Reporte.rpt"
'paso 4
CrystaReport1.WindowState = crptMaximized 'Esto es para que el estado de la ventana te lo muestre Maximizado, es opcional
'Paso 5
CrystaReport1.Action = 1 'Es para que te muestre el Visor de Reporte, opcional
'Opciones
'En caso de querer mandar a imprimir directo el Paso 4 se omite y el paso cincon queda así: CrystaReport1.Action = 0
'Para mandar a imprimir una tabla haces esto en el paso 2, se me ocurre esto:
'CrystaReport1.SelectionFormula="{Calificaciones.cve_alumno}<>0" ->en caso de que la cve_alumno sea tipo numero (double, long, integer)
'CrystaReport1.SelectionFormula="{Calificaciones.cve_alumno}<>'0' " ->en caso de que la cve_alumno sea tipo texto