VB.NET PowerPoint - PPT-to-SVG Converting Guide

' Render PPTXDocument to get a REImage collection, or choose specific slide to render.
Private Function GetPage(pageIndex As Integer) As BasePage Implements PPTXDocument.GetPage
End Function
Private Function toImage() As BaseImage Implements PPTXPage.toImage
End Function
Private Function toImage(height As Integer, width As Integer) As BaseImage Implements PPTXPage.toImage
End Function

' Render REImage in other image format using image convert APIs.
Private Sub SaveImageFile(image As REImage, filePath As [String]) Implements REFile.SaveImageFile
End Sub

''' <summary>
''' Render PPTXDocument to images of SVG Format
''' </summary>
''' <param name="PowerPointFilePath"></param>
''' <returns></returns>
Public Function RenderPPTXDocumentToSVG(PowerPointFilePath As [String]) As List(Of Stream)
   ' a list of stream which contains the image data of the SVG image.
   Dim buffer As New List(Of Stream)()

   Dim doc As New PPTXDocument(PowerPointFilePath)
   For i As Integer = 0 To doc.GetPageCount() - 1
      Dim page As PPTXPage = DirectCast(doc.GetPage(i), PPTXPage)

      Dim temp As REImage = DirectCast(page.ToImage(), REImage)
      Dim imageStream As New MemoryStream()
      If temp IsNot Nothing Then
         temp.Convert(imageStream, ImageFormat.svg)
         buffer.Add(imageStream)

      End If
   Next

   Return buffer
End Function