Visual Basic - Impresión en Matriz de Punto

Hola

Alguien puede decirme cómo se puede imprimir desde Visual Basic como si imprimiera desde DOS. Ya que estoy desarrollando un sistema que genera listados tremendos, entonces, la forma más económica y rápida es usando una Matriz de Punto, pero la letra que imprime es gráfica y no la de puntitos que se obtenia desde DOS.

Espero me ayuden

Jose

dim devolucion

Open App.Path & "\Archivo_a_Imprimir.TXT" For Output As #1

Print #1, Chr(27) & Chr(64) (Inicializa la hoja)
Print #1, Chr(18) & "Linea numero uno" (La impresion de una linea)

Close #1

Open App.Path & "\Bateria que Imprime.bat" For Output As #2

Print #2, "TYPE Archivo_a_Imprimir.TXT > prn"

Close #2

devolucion = Shell(App.Path & "\Bateria que Imprime.BAT", vbHide)

La ultima linea genera una sesion escondida en DOS y lanza la bateria .BAT
que a su vez imprime el Archivo_a_Imprimir.TXT

Mario Espejo

también al correo [email protected]