Título: archivo secuencial de texto a archivo for random aleatorio Publicado por: corlo en 8 Enero 2016, 15:56 pm Hola soy Corlo
hola quisiera pasar el codigo archivo secuencial de texto a archivo for random aleatorio el codigo que tengo es este Código: Dim i As Integer mes = Text8.Text fecha = Text1.Text nombre = Text2.Text apellido = Text3.Text producto = Text4.Text cantidad = Text5.Text precio = Text6.Text total = Val(Text5.Text) * Val(Text6.Text) Text7.Text = Val(Text5.Text) * Val(Text6.Text) archivo = App.Path & "\ventas.txt" Open archivo For Append As #1 Write #1, mes, fecha, nombre, apellido, producto, cantidad, precio, total For i = 0 To List1.ListCount - 1 Print #1, List1.List(i) Next i Close #1 Gracias Título: Re: archivo secuencial de texto a archivo for random aleatorio Publicado por: XresH en 14 Enero 2016, 22:35 pm Hola, de verdad lei varias veces pero no comprendo que es lo queres hacer...
Si especificas un poco mas quiza podria ayudarte.. Saludos. |