Duda para Fernando
Publicado por Ivette (28 intervenciones) el 24/12/2003 07:23:08
Hola Fernando, lo que me contestaste ya lo traté de hacer, sin embargo, no sé por qué razón no se me escriben los datos en el archivo de texto, osea sólo me lo crea y lo cierra pero al abrirlo no hay datos escritos, mira el codigo es:
dim cadena as string
For r = 0 To MSFlexGrid2.Rows - 1
For c = 0 To MSFlexGrid2.Cols - 1
cadena = MSFlexGrid1.TextMatrix(r, c)
open "c:\mifichero.txt" for output as #1
print #1, cadena ' <--alli estan los datos
Next c
Next r
close#1
Espero me puedas ayudar, quiero que los datos se exporten tal y como están en el grid, en columnas y renglones, de ante mano gracias
dim cadena as string
For r = 0 To MSFlexGrid2.Rows - 1
For c = 0 To MSFlexGrid2.Cols - 1
cadena = MSFlexGrid1.TextMatrix(r, c)
open "c:\mifichero.txt" for output as #1
print #1, cadena ' <--alli estan los datos
Next c
Next r
close#1
Espero me puedas ayudar, quiero que los datos se exporten tal y como están en el grid, en columnas y renglones, de ante mano gracias
Valora esta pregunta


0