Título: Ayuda con creacion de txt Publicado por: Jables en 5 Octubre 2012, 06:04 am Bueno, en vista de que no consigo hacerlo funcionar vengo por vuestra ayuda.
creo que el codigo se explica por si mismo: Código: Private Sub Command1_Click() El problema es que nunca genera el archivo "Presupuesto N°2.txt" no pasa jamás del 1 (en form_load está el N=1 que hace que el primer txt sea el nro 1) alguien puede ver mi error? gracias! Título: Re: Ayuda con creacion de txt Publicado por: HdM en 5 Octubre 2012, 12:15 pm Hola.
Pues si que hay cosas raras si: Código
Lo 1º es que estás definiendo la variable a nivel local de este proc., de modo que su ámbito sólo se extiende al proc. Lo digo por lo de: Citar (en form_load está el N=1 que hace que el primer txt sea el nro 1) Lo 2º es que a n le das valor 1 y luego montas un for (que no le veo ningún sentido) donde vuelves a igualar n a 0. Eso jamás te va a crear ningún fichero cuyo Nº sea <> 0. Saludos. Título: Re: Ayuda con creacion de txt Publicado por: Elemental Code en 5 Octubre 2012, 18:53 pm me sorprende que no te de error de bucle FOR sin NEXT.
Código: For n = 0 To 0 Esto en lenguaje de gente se traduce en. Código: Repetir el siguiente código hasta que cero sea igual a cero. Ademas todo for necesita su next. Ese codigo esta bastante incompleto y mal :S Ademas, vos decis que pones la variable n en uno en esta linea: Código: n = n + 1 pero al hacer esto: Código: For n = 0 To 0 Título: Re: Ayuda con creacion de txt Publicado por: HdM en 6 Octubre 2012, 16:37 pm Hola.
Está claro que el next del for lo ha omitido, pero estar, es obvio que está en el source, igual que todo Sub necesita su End Sub y lo ha omitido también. Pero es evidente, que también estará. Con respecto a los problemas de la generación de los ficheros, pues ya está todo dicho. Saludos. |