• Home
 · 
• Windows API Call/Explanation
 · 
• Give us Complete Memory Status

Give us Complete Memory Status

Give us Complete Memory Status

API Declarations


Private 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




Rate Give us Complete Memory Status

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Private Sub Command1_Click()
Dim memstat As MEMORYSTATUS
Call GlobalMemoryStatus(memstat)
Label1.Caption = Format(memstat.dwAvailPageFile)
Label2.Caption = Format(memstat.dwAvailPhys)
Label3.Caption = Format(memstat.dwAvailVirtual)
Label4.Caption = Format(memstat.dwLength)
Label5.Caption = Format(memstat.dwMemoryLoad)
Label6.Caption = Format(memstat.dwTotalPageFile)
Label7.Caption = Format(memstat.dwTotalPhys)
Label8.Caption = Format(memstat.dwTotalVirtual)


End Sub