I was able to resolve it:
Dim gridPrintDocument As New GridPrintDocument(grdListMCInv.Grid, True)
Dim printPreviewDialog As New PrintPreviewDialog()
'Set the Grid contents to the print preview document
printPreviewDialog.Document = gridPrintDocument
'Display the print preview dialog
printPreviewDialog.ShowDialog()