Come leggere la memoria di sistema VB.NET

December 11

Visual Basic.NET (VB.NET) non offre un comando built-in per visualizzare lo stato della memoria di sistema. Tuttavia, è possibile crearne uno usando un blocco di codice. Questo aggiungerà una funzione "GlobalMemoryStatus" al tuo quadro VB.NET, che permette un comando di una sola riga in futuro per visualizzare la memoria di sistema. Quando si esegue, una finestra pop-up vi dirà quanto la vostra memoria di sistema è in uso in kilobyte, e come percentuale della memoria totale.

istruzione

1 Aprire il quadro VB.NET.

2 Copiare e incollare il seguente codice nella riga di comando, quindi premere Invio:

Tipo privata 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

Private Declare Sub GlobalMemoryStatus Lib "Kernel32" _

(LpBuffer Come MEMORYSTATUS)

Private Sub Form_Load ()

Dim MS Come MEMORYSTATUS

MS.dwLength = Len (MS)

GlobalMemoryStatus MS

Label1 (0) .Caption = Format $ (MS.dwMemoryLoad, "###, ###, ###, ###") e "% usato"

Label1 (1) .Caption = Format $ (MS.dwTotalPhys / 1024 ", ###, ###, ###, ###") e "Kbyte"

Label1 (2) .Caption = Format $ (MS.dwAvailPhys / 1024 ", ###, ###, ###, ###") e "Kbyte"

Label1 (3) .Caption = Format $ (MS.dwTotalPageFile / 1024 ", ###, ###, ###, ###") e "Kbyte"

Label1 (4) .Caption = Format $ (MS.dwAvailPageFile / 1024 ", ###, ###, ###, ###") e "Kbyte"

Label1 (5) .Caption = Format $ (MS.dwTotalVirtual / 1024 ", ###, ###, ###, ###") e "Kbyte"

Label1 (6) .Caption = Format $ (MS.dwAvailVirtual / 1024 ", ###, ###, ###, ###") e "Kbyte"

End Sub

3 Tipo "GlobalSystemMemory" (senza virgolette) e premere "Invio". Questo comando ora vi mostrerà le informazioni di memoria di sistema. Tipo in qualsiasi momento per vedere la memoria, e non sarà necessario utilizzare di nuovo il codice di impostazione a lungo.