public static IReadOnlyList<Stream> ExportToImage(
    this Document document
)

<ExtensionAttribute>
Public Shared Function ExportToImage(
    document As Document
) As IReadOnlyList(Of Stream)

using DevExpress.XtraRichEdit.Export.Image;
using DevExpress.XtraRichEdit;
using DevExpress.Drawing;

using RichEditDocumentServer wordProcessor = new RichEditDocumentServer();

var streamList = wordProcessor.Document.ExportToImage();
int i = 1;
foreach (var stream in streamList) {
    var newFileName = Path.GetFileNameWithoutExtension("ExportedPage.jpeg") + i + Path.GetExtension("ExportedPage.jpeg");
    StreamToFile(stream, newFileName);
    i++;
    stream.Dispose();
}
static void StreamToFile(Stream stream, string filePath)
{
    using (var fileStream = File.Create(filePath))
    {
        stream.Seek(0, SeekOrigin.Begin);
        stream.CopyTo(fileStream);
    }
}

Imports DevExpress.XtraRichEdit.Export.Image
Imports DevExpress.XtraRichEdit
Imports DevExpress.Drawing

Imports RichEditDocumentServer wordProcessor = New RichEditDocumentServer()

wordProcessor.LoadDocument("C:\Documents\Alice.docx")
Dim streamList = wordProcessor.Document.ExportToImage()
Dim i As Integer = 1
For Each stream In streamList
  Dim newFileName = Path.GetFileNameWithoutExtension("ExportedPage.jpeg") & i & Path.GetExtension("ExportedPage.jpeg")
  StreamToFile(stream, newFileName)
  i += 1
  stream.Dispose()
Next stream

Shared Sub StreamToFile(ByVal stream As Stream, ByVal filePath As String)
  Using fileStream = File.Create(filePath)
    stream.Seek(0, SeekOrigin.Begin)
    stream.CopyTo(fileStream)
  End Using
End Sub