Título: Generador de numeros Publicado por: pedro004 en 26 Mayo 2007, 22:01 pm Buenas!Miren estoy tratndo de encontrar un programa que automaticamente me rellene los numeros intermedios.Ej: del 100000 al 1000000000000000 y que me haga un txt con todos los numeros intermedios, no se si me explico pretendo tener algun programa que haga como el wlandescrypter de generar las letras pero esto con numeros. Esto es lo que me han ayudado y ahora me dejaron tirado:
Private Sub Command1_Click() Dim i As Double Dim start As Double, fin As Double, siguiente As Double Open "C:\prueba.txt" For Append As #1 start = Int(Text1.Text) fin = Int(Text2.Text) For i = start To fin siguiente = i ' MsgBox "numero" & siguiente Print #1, siguiente ' Print #1, "esta es una línea" Next i MsgBox "fin" Close #1 End Sub PD: Son para las wep de r-wlanXX.. gracias Título: Re: Generador de numeros Publicado por: pedro004 en 26 Mayo 2007, 22:44 pm Ahhhh....el de arriba funciona pero me genera tambien los ultimos cinco digitos y yo quiero que los ultimos 5 digitos sean 0 (ceros) y que no cambien solo los del medio ejemplo:
203XXXX00000 asi gracias Título: Re: Generador de numeros Publicado por: pedro004 en 27 Mayo 2007, 00:20 am pues he buskado muxo y nada.no encuentro nada para hacerlo ( :-[
Título: Re: Generador de numeros Publicado por: GrTk en 27 Mayo 2007, 02:00 am Dim i As Double
Open "C:\prueba.txt" For Output As #1 start = Val(Text1.Text) fin = Val(Text2.Text) For i = 0 To 9999 Write #1, Val("203" + Format(Str(siguiente), "0000") + "00000") Next i MsgBox "fin" Close #1 me genera esto 203000000000 203000100000 203000200000 203000300000 203000400000 203000500000 203000600000 203000700000 203000800000 203000900000 203001000000 203001100000 203001200000 203001300000 203001400000 (...) 203998800000 203998900000 203999000000 203999100000 203999200000 203999300000 203999400000 203999500000 203999600000 203999700000 203999800000 203999900000 es eso lo que queres? Título: Re: Generador de numeros Publicado por: Ferсhu en 27 Mayo 2007, 03:44 am O podes generar numeros del 0 al 9999 y al resultado multiplicarlo por 100.000, le sumas 203.000.000.000 y listo te genera los numeros q querias.
Título: Re: Generador de numeros Publicado por: pedro004 en 28 Mayo 2007, 15:32 pm Muchas gracias ferchu me sirvio mucho...con lo simple que es el programa no se por que no hay mas... :-\
|