Eliminar un archivo de texto

Artículo
10/07/2008

Actualización: noviembre 2007

En esta lección, obtendrá información sobre cómo eliminar un archivo de una carpeta mediante My.Computer.FileSystem (Objeto).

Un archivo de texto se puede eliminar mediante My.Computer.FileSystem.DeleteFile (Método). Siempre es recomendable preguntar a los usuarios si realmente desean eliminar un archivo antes de hacerlo. Imagínese que hace clic de manera accidental en un botón que elimina automáticamente, sin ninguna advertencia, un archivo que necesitaba. Usará MsgBoxResult (Enumeración) para determinar si el usuario hace clic en Sí o No cuando se le solicita que confirme la eliminación.

Inténtelo.

Para eliminar un archivo

Abra el proyecto del visor de imágenes de la lección anterior. Si aún no lo ha completado, vaya a Leer en un archivo de texto y finalice la lección antes de continuar.
En el Explorador de soluciones, haga clic en Form1.vb y, a continuación, en el menú Ver, haga clic en Diseñador.
Agregue un control Button al formulario y colóquelo junto al botón Cargar favoritos.
Cambie las siguientes propiedades de este botón:

Propiedad

Valor

Name

EliminarFavoritos

Text

Eliminar favoritos

Size

92, 23
Haga doble clic en el nuevo control Button para agregar el controlador de eventos predeterminado en el editor de código.

Propiedad	Valor
Name	EliminarFavoritos
Text	Eliminar favoritos
Size	92, 23

En el controlador de eventos DeleteFavorites_Click, agregue el siguiente código. Este código comprueba que el archivo que se va a eliminar existe y, a continuación, muestra un cuadro de mensaje para comprobar que el usuario desea eliminarlo. Si el usuario hace clic en sí, se borran el cuadro de imagen y el cuadro de lista y, a continuación, el archivo de texto FavoritePictures se elimina de la carpeta Documentos.

' Check that the favorites text file exists.
If My.Computer.FileSystem.FileExists(FavoritePictures) Then

    ' Ensure that user wants to delete the favorites text file.
    If MsgBox("Are you sure you want to send the favorites" _
        & " file to the Recycle Bin?", MsgBoxStyle.YesNo, _
        "Delete Favorite Pictures") = MsgBoxResult.Yes Then

        ' Clear the picture box and the list box.
        Me.ListBox1.Items.Clear()
        Me.PictureBox1.ImageLocation = ""

        ' Delete the favorites file.
        My.Computer.FileSystem.DeleteFile(FavoritePictures)

    End If
Else
    MsgBox("The favorites file does not exist.")
End If

Presione F5 para ejecutar el código.
Haga clic en Eliminar favoritos y, a continuación, haga clic en Sí al solicitar la confirmación.
Compruebe que el archivo FavoritePictures.txt se ha eliminado de la carpeta Documentos haciendo clic en el botón Cargar favoritos.

Pasos siguientes

En este conjunto de lecciones, hemos visto cómo crear una aplicación Visor de imágenes que permite leer nombres de archivo del directorio Imágenes y mostrar las imágenes correspondientes en un cuadro de imagen. También hemos visto cómo leer un archivo de texto y cómo escribir en él o eliminarlo. En el conjunto siguiente de lecciones, obtendrá información sobre clases, las guías para objetos que puede reutilizar en sus programas.

Siguiente lección: Programar con objetos: utilizar clases