This is Code For a Memory Status Program
This is Code For a Memory Status Program
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 This is Code For a Memory Status Program
(1(1 Vote))
''''''''''''''''''''''
'
''''
''''''''''''''''''''''
'Created By Dimitar Madzunkov(Macedonia - Gevgelija)
''
'''''''''''''''''''''''''''''
'''''''''''''''''''''''''''
''''''''''''''''''''''''''
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
This is Code For a Memory Status Program Comments
No comments yet — be the first to post one!
Post a Comment