텍스트 파일 삭제

아티클
08/20/2008

업데이트: 2007년 11월

이 단원에서는 My.Computer.FileSystem 개체를 사용하여 폴더에서 파일을 삭제하는 방법을 배웁니다.

My.Computer.FileSystem.DeleteFile 메서드를 사용하여 텍스트 파일을 삭제할 수 있습니다. 파일을 실제로 삭제하기 전에 삭제 여부를 묻는 메시지를 표시하는 것이 좋습니다. 단추를 실수로 클릭하여 필요한 파일이 아무런 경고 없이 자동으로 삭제되었다고 생각해 보면 이러한 확인 메시지가 필요한 이유를 알 수 있을 것입니다. 이 경우에는 MsgBoxResult 열거형을 사용하여 사용자가 삭제 확인 메시지에 대해 Yes 또는 No를 클릭했는지 확인합니다.

실습

파일 삭제

이전 단원에서 만든 Picture Viewer 프로젝트를 엽니다. 이 프로젝트를 아직 완성하지 않은 경우에는 계속하기 전에 텍스트 파일에서 읽기 단원으로 돌아가서 프로젝트를 완성하십시오.
솔루션 탐색기에서 Form1.vb를 클릭한 다음 보기 메뉴에서 디자이너를 클릭합니다.
폼의 Load Favorites 단추 옆에 Button 컨트롤을 추가합니다.
이 단추의 속성을 다음과 같이 변경합니다.

속성

값

Name

DeleteFavorites

Text

Delete Favorites

Size

92, 23
새로 추가한 Button 컨트롤을 두 번 클릭하여 코드 편집기에서 기본 이벤트 처리기를 추가합니다.

속성	값
Name	DeleteFavorites
Text	Delete Favorites
Size	92, 23

DeleteFavorites_Click 이벤트 처리기에 다음 코드를 추가합니다. 이 코드는 삭제하려는 파일이 존재하는지 확인한 후 파일을 삭제할지 여부를 확인하는 메시지 상자를 표시합니다. 사용자가 Yes를 클릭하면 그림 상자와 목록 상자가 지워지고 문서 폴더에서 FavoritePictures 텍스트 파일이 삭제됩니다.

' 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

F5 키를 눌러 코드를 실행합니다.
Delete Favorites를 클릭한 다음 표시되는 메시지 상자에서 Yes를 클릭합니다.
Load Favorites 단추를 클릭하여 문서 폴더에서 FavoritePictures.txt 파일이 삭제되었는지 확인합니다.

다음 단계

이 단원에서는 그림 디렉터리에서 파일 이름을 읽을 수 있는 Picture Viewer 응용 프로그램을 만들고, 해당 그림을 그림 상자에 표시하는 방법을 배웠습니다. 또한 텍스트 파일을 읽고 텍스트 파일에 쓰는 방법 및 텍스트 파일을 삭제하는 방법도 배웠습니다. 다음 단원에서는 프로그램에서 다시 사용할 수 있는 개체의 청사진인 클래스에 대해 배웁니다.

다음 단원: 개체를 사용한 프로그래밍: 클래스 사용