Get File Name From Path

   Public Shared Function GetFileNameFromPath(FilePath As String) As String
       Dim ff As String()
       ff = Split(FilePath, "\")
       Return (ff(ff.Length - 1))
   End Function