Crearcion de Archivos

[Mclaren_West]

Hola Como estan foreros y moderadores saben tengo una duda bueno no es una duda no e hacerlo la creacion de archivos en vb saben que la ayuda plantea esto para la creacion de dichos archivos:

Sub CreateAfile
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set a = fs.CreateTextFile("c:\archivoprueba.txt", True)
    a.WriteLine("Esto es una prueba.")
    a.Close
End Sub

hay me crea un directorio en c pero es un archivo .txt y me crea eso de
"esto es una prueba", lo que yo quiero hacer es que me cree un archivo
pero que este tenga un tamaño definido por mi es decir que soporte unas
1000 variable si lo haro por .txt el me puede alojar indefinidas variable
y no lo quiero asi sera que ud me pueden ayudar con ese problema???

gracias de antemano por su colaboracion conmigo

[SheKeL_C$]

a mi m gusta mas codear de otra manera un poco mas facil, al fn y al cabo son menos lineas

Código [Seleccionar] Expandir

Private Sub Command1_Click()
Timer1.Enabled = True  ' enciende el timer
End Sub

Private Sub Timer1_Timer()

    Open text1.text For Append As #1
If FileLen(Text1.Text) < Val(Text2.Text) Then     'en el text2 pones el tamaño en bytes
    Print #1, "." 'aqui escribe Tan solo un punto
    Close #1
Else
    Timer1.Enabled = False 'cuando el tamaño ha llegado el valor no s vuelve a repetir
End If

End Sub

Te lo e puesto con comentarios para q te aclares mejor

[Mclaren_West]

ok pero mira esto, si yo que en una variable hay en este caso es txt me valla creando una variable hay por ejemplo 1 "a" en el txt cada vez que el timer avance y luego por medio de un inputbox yo le diga a cuantas "a" crea cada segundo me entiendes?? es algo asi como esto

timer1.interval = 1000
seg = seg + 1
bueno cada vez que la variable seg me aumente deacuerdo al timer me cree una "a" hasta el tamaño que yo le defina utilizando lo que me acabas de enseñar

bueno espero me ayas entendido lo que te e querido decir

[SheKeL_C$]

La verdad es q no te entiendo, pero exandole imaginacion...
creo q lo q pides es k en un segundo escriba una letra, en 2 segundos 2 letras y en 3 segundos..... no se si es lo q pides aunk no l veo la vntaja d hacerlo asi..

Sino prueba a explicarte mejor para q t entienda 

[Mclaren_West]

ok bueno voy a enviarte un privado explicandote para ver si asi me entiendes mejor ok