VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



Give us Complete Memory Status

by Nidhi (2 Submissions)
Category: Windows API Call/Explanation
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Wed 30th July 2003
Date Added: Mon 8th February 2021
Rating: (1 Votes)

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




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


Download this snippet    Add to My Saved Code

Give us Complete Memory Status Comments

No comments have been posted about Give us Complete Memory Status. Why not be the first to post a comment about Give us Complete Memory Status.

Post your comment

Subject:
Message:
0/1000 characters