Visual Basic - Tabulacion de archivos planos generados desde VB60

Life is soft - evento anual de software empresarial
 
Vista:

Tabulacion de archivos planos generados desde VB60

Publicado por Emilio (83 intervenciones) el 08/11/2006 00:45:36
Hola a todos.

Estoy trabajando en un apalicacion que genera un archivo plano a manera de informe, una parte del informe consiste en informacion organizada en columnas con sus titulos.

Al abrir el archivo plano la informacion me aparece algo desordenada y desplazada a otras columnas, lo cual no es lo ideal.

Mi pregunta es como hago para corregir este error, existe alguna forma de generar unos tabs desde visual???? No soy muy experto en manejo de archivos planos, adicionalmente me gustaria manipular el tipo y tamaño de letra con la que se generara el archivo plano.

Agradezco la ayuda que me puedan brindar.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil
Val: 7
Ha aumentado su posición en 2 puestos en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

RE:Tabulacion de archivos planos generados desde V

Publicado por El Viejo Charles (262 intervenciones) el 08/11/2006 08:24:28
Esto te debe servir mi viejo:

Open App.Path & "\PRUEBA.txt" For Output As #1 ' Abre el archivo para operaciones de salida.
Write #1, "Esto es una prueba" ' Escribe texto en el archivo.
Write #1, ' Imprime una línea en blanco en el archivo.
Write #1, "Zona 1"; Tab; "Zona 2" ' Escribe en dos zonas de impresión.
Write #1, "Hola"; " "; "mundo" ' Separa las cadenas ' de caracteres con un espacio.
Write #1, Spc(5); "5 espacios iniciales" 'Escribe 5 espacios iniciales.
Write #1, Tab(10); "Hola" ' Escribe una palabra en la columna 10.

' Se establecen valores de Boolean, Date, Null y Error.
Dim MiBool, MiFecha, MiNull, MiError
MiBool = False: MiFecha = #2/12/1969#: MiNull = Null
MiError = CVErr(32767)
' True, False, Null y Error se traducen de acuerdo a la configuración regional del
' sistema. Los literales de fecha se escriben en el formato de fecha corta estándar.
Write #1, MiBool; " es un valor Boolean"
Write #1, MiFecha; " es una fecha"
Write #1, MiNull; " es un valor nulo"
Write #1, MiError; " es un valor de error"
Close #1 ' Cierra el archivo.

Suerte colega.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Tabulacion de archivos planos generados desde V

Publicado por Emilio (83 intervenciones) el 08/11/2006 16:24:56
Viejo Charles, muchas gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar