Interface ICompression
  Function Compress(ByVal FileName As String) As Boolean
  Function DeCompress(ByVal FileName As String) As Boolean
End Interface