MemFree

Public 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
Public Declare Sub GlobalMemoryStatus _
    Lib "kernel32" (lpBuffer As MEMORYSTATUS)
'Il resto del codice serve per ottenere i risultati:
Dim MS As MEMORYSTATUS
MS.dwLength = Len(MS)
GlobalMemoryStatus MS
' MS.dwMemoryLoad contiene la percentuale di memoria usata
' MS.dwTotalPhys contiene la quantit� totale di memoria fisica in bytes
' MS.dwAvailPhys contiene la quantit� di memoria fisica disponibile
' MS.dwTotalPageFile contiene la quantit� di memoria totale nel page file
' MS.dwAvailPageFile contiene la quantit� di memoria disponibile nel page file
' MS.dwTotalVirtual contiene la quantit� totale di memoria virtuale
' MS.dwAvailVirtual contiene la quantit� di memoria virtuale diponible
' Si pu� usare questa funzione in una About Box oppure per
' monitorare il sistema.
 E' facile trovare la quantit� di memoria libera sotto 
Windows, usando la chiamata all'API GlobalMemoryStatus.

Public 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
Public Declare Sub GlobalMemoryStatus _
Lib "kernel32" (lpBuffer As MEMORYSTATUS)
'Il resto del codice serve per ottenere i risultati:

Dim MS As MEMORYSTATUS
MS.dwLength = Len(MS)
GlobalMemoryStatus MS
' MS.dwMemoryLoad contiene la percentuale di memoria usata

' MS.dwTotalPhys contiene la quantita' totale di memoria fisica in bytes

' MS.dwAvailPhys contiene la quantita' di memoria fisica disponibile

' MS.dwTotalPageFile contiene la quantita' di memoria totale nel page file

' MS.dwAvailPageFile contiene la quantita' di memoria disponibile nel page file

' MS.dwTotalVirtual contiene la quantita' totale di memoria virtuale

' MS.dwAvailVirtual contiene la quantita' di memoria virtuale diponible

' Si puo' usare questa funzione in una About Box oppure per

' monitorare il sistema.

E' facile trovare la quantita' di memoria libera sotto
Windows, usando la chiamata all'API GlobalMemoryStatus.