ayuda con este codigo
Publicado por jaime (3 intervenciones) el 20/06/2002 00:34:08
saludos:
cree un menu, con el nombre de guardar, y se supone que su funcion es coger todo el contenido de un listbox y guardarlo en un archivo de texto, copio este codigo:
Private Sub Guardar_Click()
Open App.Path & "\estadisticas.txt" For Output As #1
Print #1, List1
Close #1
End Sub
pero solo me guarda el primer elemento del listbox, y el listbox se supone tiene entradas infinitas (puesto que hay una función que de un textbox le inserta entradas). como hago para que me los guarde todos, si no es mucha molestia podría completarme el codigo??
de antemano gracias
cree un menu, con el nombre de guardar, y se supone que su funcion es coger todo el contenido de un listbox y guardarlo en un archivo de texto, copio este codigo:
Private Sub Guardar_Click()
Open App.Path & "\estadisticas.txt" For Output As #1
Print #1, List1
Close #1
End Sub
pero solo me guarda el primer elemento del listbox, y el listbox se supone tiene entradas infinitas (puesto que hay una función que de un textbox le inserta entradas). como hago para que me los guarde todos, si no es mucha molestia podría completarme el codigo??
de antemano gracias
Valora esta pregunta
0