[vb.net] 파일 삭제 File.Delete / Directory.Exists

        Dim Desktop As String = System.Environment.GetFolderPath(Environment.SpecialFolder.Desktop)

        Desktop = String.Concat(Desktop, "\program1472.com")

        Desktop &= "\"

        If Directory.Exists(Desktop) Then

            For Each str As String In My.Computer.FileSystem.GetFiles(Desktop, FileIO.SearchOption.SearchAllSubDirectories, "*.*")

                File.Delete(str)

            Next

        End If