Didalam sebuah Sistem atau aplikasi kalau diproses atau dirun akan memakai Memory didalam PC sebagai penunjang proses aplikasi tersebut, apakah kita tahu berapakah yang dipakai dalam menjalankan aplikasi, kali admin akan share sourcode mungil untuk mengetahui status memori (RAM) yang sedang digunakan.
Cek Memory Status (Ram) Penggunaan
Buka Ms. Visual Basic 6.0 – StandarEXE dan buatlah sebuah form dan module. Untuk form tambahkan 2 buah label dan Timer, yaitu

1. Label1 (name : lblPMem)
2. Label1 (name : lblVMem)
3. Timer1 (name : Timer1)

Copykan syntak dibawah ini ke dalam Module

Public Declare Sub GlobalMemoryStatus Lib “kernel32” (lpBuffer As MEMORYSTATUS)
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
Public MEM_STAT As MEMORYSTATUS

Setelah itu double klik Timer yang berada di form kemudian pastekan syntak dibawah ini : 

Call GlobalMemoryStatus(MEM_STAT)
lblPMem.Caption = ” Physical Memory : ” & Format((MEM_STAT.dwAvailPhys / 1024) / 1024, “#,##0.0″) & ” MB “
lblVMem.Caption = ” Virtual Memory : ” & Format((MEM_STAT.dwAvailVirtual / 1024) / 1024, “#,##0.0″) & ” MB “

Untuk interval yang dipakai pada komponen Timer1, dapat sesuai selera agan-agan saja, tetapi disini admin memakai 5, sesudah semuanya selesai, simpan RUN/F5, akan terlihat Physical Memory dan Virtual Memory.