20/11/2011, 13:37
|
| | | Fecha de Ingreso: noviembre-2011
Mensajes: 3
Antigüedad: 13 años Puntos: 0 | |
| ¿como borro en el txt lo q borro en una list?
tengo 3 list.list las cuales puedo agregarles nuevos productos y editarlas. pero cuando las edito se borra en la lista y en el txt no..
como puedo hacer que me lo borre ahi?
les muestro el codigo de mi form load
Dim numero As Integer
Dim variable As String
numero = 0
Open App.Path & "\" & "listadodeelementos" & ".txt" For Input As #1
While Not EOF(1)
Line Input #1, variable
If (numero Mod 3 = 0) Then
List13.AddItem (variable)
Else
If (numero Mod 3 = 1) Then
List12.AddItem (variable)
Else
List11.AddItem (variable)
End If
End If
numero = numero + 1
Wend
Close #1 |