Cacher is the code snippet organizer for pro developers

' For complete examples and data files, please go to https://github.com/groupdocs-viewer/GroupDocs.Viewer-for-.NET
' Create new instance of GroupDocs.Viewer.Metered class
Dim metered As New Global.GroupDocs.Viewer.Metered()

' Set public and private keys
Dim publicKey As String = "***"
Dim privateKey As String = "***"

' Set public and private keys to metered instance
metered.SetMeteredKey(publicKey, privateKey)

' Get metered value before usage of the comparison
Dim amountBefore As Decimal = Global.GroupDocs.Viewer.Metered.GetConsumptionQuantity()

Console.WriteLine("Amount (MB) consumed before:" + amountBefore)

' Get pages
Dim htmlHandler As New Global.GroupDocs.Viewer.Handler.ViewerHtmlHandler()
Dim pages As List(Of Global.GroupDocs.Viewer.Domain.Html.PageHtml) = htmlHandler.GetPages("input.pdf")

' Get metered value after usage of the comparison
Dim amountAfter As Decimal = Global.GroupDocs.Viewer.Metered.GetConsumptionQuantity()

Console.WriteLine("Amount (MB) consumed after: " + amountAfter)