ขอวิธีการ ข้ามไฟล์ หรือ ignore ของ UnauthorizedAccessException

Imports System.IO

Public Class Form1
    Dim foundfile As String
    Dim Cp As String = "C:\"
    Private Sub Sbox_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Sbox.TextChanged

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If Sbox.Text = Dbox.Text Then
            MessageBox.Show("ชื่อไฟล์ผิดพลาด หรือ ซ้ำกัน โปรดลองใหม่", "Alert Message")
        End If

        Try
            For Each foundfile In My.Computer.FileSystem.GetFiles(Cp, FileIO.SearchOption.SearchAllSubDirectories, Sbox.Text)

            Next

            My.Computer.FileSystem.CopyFile(foundfile, Dbox.Text, True)
            MessageBox.Show("การค้นหาและคัดลอกเสร็จสมบูรณ์", "Message Alert !", MessageBoxButtons.OK, MessageBoxIcon.Information)
        Catch ex As IOException
            MessageBox.Show("พบปัญหาเกี่ยวกับ Input / Output โปรดตรวจสอบไฟล์ต้นทางและปลายทาง", "Message Alert !", MessageBoxButtons.OK, MessageBoxIcon.Error)
        Catch ex As ArgumentNullException
            MessageBox.Show("Path ของ SourceFile ไม่ถูกต้องโปรดระบุอีกครั้ง", "Message Alert !", MessageBoxButtons.OK, MessageBoxIcon.Error)
        Catch e As UnauthorizedAccessException
            ' code ส่วนนี้ครับ ที่อยากจะได้ ให้ข้ามไฟล์ที่ติด permission ไปค้นหาต่อครับ
        End Try

    End Sub
End Class