Code:
If strFileName = Right$(strPath, Len(strFileName)) Then
  'Bingo!
End If