Red de conocimiento informático - Conocimiento del nombre de dominio - ¡¡¡Urgente!!! ¿Cómo obtener el uso de memoria usando la programación VB?

¡¡¡Urgente!!! ¿Cómo obtener el uso de memoria usando la programación VB?

Tipo privado 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

Tipo de fin

Declaración privada Sub GlobalMemoryStatus Lib "kernel32" (lpBuffer como MEMORYSTATUS)

Subprivada Form_Load()

Dim MemStat como MEMORYSTATUS

GlobalMemoryStatus MemStat

MsgBox "Tienes" Str$(MemStat.dwTotalPhys / 1024) " Kb de memoria total y" Str$(MemStat.dwAvailPageFile / 1024) " Kb de memoria disponible para PageFile."

Fin Sub