by Raghu (22 Submissions)
Category: Windows API Call/Explanation
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Mon 25th December 2000
Date Added: Mon 8th February 2021
Rating:
(1 Votes)
Code to Display the % of Memory in Use
API Declarations
Private Type MEMORYSTATUS
dwLength as Long
dwMemoryLoad as Long
dwAvailPhys as long
dwTotalPhys as long
dwAvailVirtual as long
dwTotalVirtual as long
End Type
dim b as MEMORYSTATUS
'mail me at [email protected]
b.dwLength = len(b)
Msgbox "The % of Memory in use is : " & Cstr(b.dwMemoryLoad)