Hi. Thanks for the reply on how to get system memory. I put the code in a module. One problem though. How do I 'print' the results in a dialog box? Like, if I had an About dialog, and wanted the system memory displayed in it.
Thanks again,
bonjour
Printable View
Hi. Thanks for the reply on how to get system memory. I put the code in a module. One problem though. How do I 'print' the results in a dialog box? Like, if I had an About dialog, and wanted the system memory displayed in it.
Thanks again,
bonjour
I know i'm not gwdash, but I can help you. I reviewed the code, and this is what you want to do:
Private Sub frmAbout_Show()
dim Mem_Stat
GlobalMemoryStatus Mem_Stat
lblMem.Caption = Mem_Stat.dwTotalPhys / 1024 & " KB Memory Total, " & cstr((100 - (Mem_Stat.dwAvailPhys / Mem_Stat.dwTotalPhys)) * 100) & "% free"
End Sub