VB.NET Imaging - Convert Word to Image Using VB

' Render Word document to get a REImage collection, or choose a specific Word page to render Private Sub New(imgs As List(Of REImage))
End Sub
Private Function GetPage(pageIndex As Integer) As BasePage Implements DOCXDocument.GetPage
End Function
Private Function toImage() As BaseImage Implements DOCXPage.toImage
End Function
Private Function toImage(width As Integer, height As Integer) As BaseImage Implements DOCXPage.toImage
End Function

' Convert rendered REImage into image format using image converting API
Private Sub Convert(s As Stream, format As ImageFormat) Implements REImage.Convert
End Sub

Public Function FromDOCXToTIFF(wordFilePath As [String]) As TIFFDocument
	Dim imageCollection As New List()
	Using doc As New DOCXDocument(wordFilePath)
		'Render DOCXPage to REImage
		For i As Integer = 0 To doc.GetPageCount() - 1
			imageCollection.Add(DirectCast(doc.GetPage(i).ToImage(), REImage))

		Next
	End Using

	' Construct TIFFDocument from image obtained from rendering DOCXPage
	return newTIFFDocument(imageCollection)

	' You can also specify which compression to use for each tiff page if you have a preferred one
	' List tifCompressionList = new List();
	' tifCompressionList.Add(TIFFCompression.CCITT1D);
	' return new TIFFDocument(imageCollection,tifCompressionList)

End Function