Visual Basic - Pregunta sobre reportes

En VB solo se pueden hacer reportes con Crystal Reports, o se pueden hacer de otra forma, yo quisiera hacer mi propio reporte, osea inicializar impresora, imprimir, finalizar pero no se como hacerlo en VB, algo asi :

inicializar impresora
while not eof
imprimir informacion
incrementar linea
avanzar registro
si linea > lineas por pagina
avanzar pagina
fin si
lopp
cerrar impresora

si alguien me puede ayudar se lo agradeceria mucho.

Gracias

Eso q quieres hacer lo logras con el objeto print, el cual no es muy configurable.
En VB6 tambien puedes crear reportes con el DataReport q es parte de VB.
Busca informacion adicional en la pagina del guille o cualquiera de la liga siguiente:
http://www.webhost.cl/tombrad/recursosvb.html

El siguiente código sirve para imprimir un fichero de texto a través del objeto Printer. Pruébalo a ver como te va...

Sub PrintArchivo(sPath As String)
Dim LineaTexto As String
Dim LnPorPg As Integer, LnImp As Integer

´Cambia algunas propiedades de la impresora
Printer.Font.Name = "Arial"
Printer.Font.Size = 12
LnPorPg = 25

Open sPath For Input As #1
Do While Not EOF(1)
Line Input #1, LineaTexto
Printer.Print LineaTexto
LnImp = LnImp + 1
If LnImp = LnPorPg Then LnImp = 1: Printer.NewPage
Loop
Printer.EndDoc
Close #1
End Sub