¡¡¡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