Visual Basic - sentencia que devuelve memoria ram en uso????

muy buenas
mi pregunta es si existe alguna sentencia en VB q te devuelva el porcentaje o algun dato sobre la memoria que está en uso. mi problema es el siguiente: tras mandar a la impresora (matricial aun x encima) un tirón de 520 facturas sólo me imprime unas 120 y luego da error de Spool32. lo que quiero hacer es segun la cantidad de memoria que este utilizada darle un parón (en segundos) mas o menos largo. no encuentro x ningun sitio una sentencia que devuelva el estado de la memoria, alguien se la sabe?
Muchas gracias

La siguiente API te dice cuánta memoria estas usando:

Public Declare Function GlobalMemoryStatus Lib "kernel32" (lpBuffer As MEMORYSTATUS) As Long

Public Type MEMORYSTATUS
dwLength As Long
dwMemoryLoad As Long
dwTotalPhys As Long
dwAvailPhys As Long
dwTotalPageFile As Long
dwAvailPageFile As Long
dwTotalVirtual As Long
dwAvailVirtual As Long
End Type

Private Sub Command1_Click()
Dim MS As MEMORYSTATUS
Dim ret As Long

'En el campo dwLength se indica el tamaño de la estructura
MS.dwLength = Len(MS)

'Llamamos a la función GlobalMemoryStatus
ret = GlobalMemoryStatus(MS)

'Mostramos ordenadamente los datos en las etiquetas del form
labelMemoriaLibre = Format(100 - MS.dwMemoryLoad, "00.0") & "%"
labelFisicaTotal = Int(MS.dwTotalPhys / (2 ^ 20)) & " MB"
labelFisicaLibre = Int(MS.dwAvailPhys / (2 ^ 20)) & " MB"
labelArchivoPag = Int((MS.dwTotalPageFile - MS.dwAvailPageFile) / (2 ^ 20)) & " MB"

End Sub