VB.Net检查文件是否存在及删除文件

Dim FileExists As Boolean

Dim filePath = "D:\Book1.xls"

fileExists = My.Computer.FileSystem.FileExists(filePath)

If fileExists = False Then

    MsgBox("文件不存在")

Else

    '文件存在则删除文件

    My.Computer.FileSystem.DeleteFile(filePath, FileIO.UIOption.OnlyErrorDialogs, FileIO.RecycleOption.DeletePermanently)

End If