VB.NET TIFF - Compress TIFF File in VB.NET

Private Sub New(img As REImage, compression As TIFFCompression)
End Sub
Private Sub New(imgs As List(Of REImage), compressions As List(Of TIFFCompression))
End Sub
Private Sub AddImage(img As REImage, positionX As Single, postionY As Single, compression As TIFFCompression) Implements TIFFPage.AddImage
End Sub

''' <summary>
''' Create TIFF page with specified compression
''' </summary>
''' <param name="img"></param>
''' <param name="compression"></param>
''' <returns></returns>
Public Function CreateTIFFPageWithCompression(img As REImage, compression As TIFFCompression) As TIFFPage
   Return New TIFFPage(img, compression)
End Function

''' <summary>
''' Create a TIFF document with specified compression type for each page
''' </summary>
''' <param name="img"></param>
''' <param name="compressions"></param>
''' <returns></returns>
Public Function CreateTIFFDocumentWithCompression(imgs As List(Of REImage), compressions As List(Of TIFFCompression)) As TIFFDocument
   Return New TIFFDocument(imgs, compressions)
End Function

''' <summary>
''' Specify image compression type when adding image to page
''' </summary>
''' <param name="img"></param>
''' <param name="page"></param>
''' <param name="compression"></param>
''' <returns></returns>
Public Function AddImageToTIFFPageWithCompression(img As REImage, page As TIFFPage, compression As TIFFCompression, x As Single, y As Single) As TIFFPage
   page.AddImage(img, x, y, compression)
   Return page
End Function