Test Foro de elhacker.net SMF 2.1

Programación => .NET (C#, VB.NET, ASP) => Programación General => Programación Visual Basic => Mensaje iniciado por: Dav98 en 12 Diciembre 2012, 22:55 PM

Título: ¡Ayuda con el codigo! V.B 6
Publicado por: Dav98 en 12 Diciembre 2012, 22:55 PM
¡Buenas! Estoy haciendo un programa en Visual Basic 6 y tal, pero me han surgido un par de dudas:

Quiero hacer que al pulsár un botón, se borre un elemento de una lista (Eso ya lo tengo), pero quiero que también borre un archivo con el mismo nombre en una carpeta donde se encuentra el programa y que borre ese mismo nombre de un archivo.txt

Algo tal que asi:

Boton borrar-> Eliminar "nombre" de la Listbox - > Eliminar "nombre" de la carpeta de archivos -> Eliminar "nombre" del archivo.txt

¿Se puede hacer? (No tengo mucha experiencia aun con V.B 6 xD)

Gracias por todo y Salu2!!!
Título: Re: ¡Ayuda con el codigo! V.B 6
Publicado por: Danyfirex en 13 Diciembre 2012, 17:25 PM
claro que se puede seria algo maso-menos así.

Código (vb) [Seleccionar]

Function killXD(nombre As String)
Dim datos As String
If List1.ListIndex <> -1 Then
kill (App.Path & "/" & nombre)
List1.RemoveItem List1.ListIndex

Open App.Path & "/1.txt" For Input As #1
datos = Input$(LOF(1), 1)
Close #1
'MsgBox (datos)
Open App.Path & "/1.txt" For Output As #1
datos = Replace$(datos, nombre, "")
Print #1, datos
Close #1
End If
End Function


claro tendrías que mejorar el codigo para depurar bien los errores, eso lo hice rapidito :S