Visual Basic.NET ( VB.NET ) non offre un built-in di comando per visualizzare lo stato della memoria di sistema . Tuttavia, è possibile crearne uno utilizzando un blocco di codice . Verrà aggiunta una funzione " GlobalMemoryStatus " al tuo quadro VB.NET , che permette un comando di una riga in futuro per visualizzare la memoria di sistema . Quando si esegue, una finestra pop- up vi dirà quanta memoria di sistema è in uso in kilobyte , e come percentuale della memoria totale . Istruzioni
1
Aprire il quadro VB.NET
2
Copia e incolla il seguente codice nella riga di comando , quindi premere Invio : .
Privato tipo MEMORYSTATUS
dwLength As Long
dwMemoryLoad As Long
dwTotalPhys Finché
dwAvailPhys As Long
dwTotalPageFile As
lunga
dwAvailPageFile As Long
dwTotalVirtual As Long
dwAvailVirtual As Long
End Type
private Declare Sub GlobalMemoryStatus Lib " kernel32 " _
( lpBuffer Come MEMORYSTATUS ) per
private Sub Form_Load ( ) per
Dim MS Come MEMORYSTATUS
MS.dwLength = Len (MS ) per
GlobalMemoryStatus MS
Label1 ( 0 ) . Caption = Format $ ( MS.dwMemoryLoad , " # # # , # # # , # # # , # # # " ) & " % utilizzato "
Label1 ( 1) . Caption = Format $ ( MS.dwTotalPhys /1024 , " # # # , # # # , # # # , # # # " ) & " Kbyte "
Label1 ( 2) . Didascalia = Format $ ( MS.dwAvailPhys /1024 , " # # # , # # # , # # # , # # # " ) & " Kbyte "
Label1 ( 3) . Caption = Format $ (Ms. dwTotalPageFile /1024 , " # # # , # # # , # # # , # # # " ) & " Kbyte "
Label1 ( 4) . Caption = Format $ ( MS.dwAvailPageFile /1024 , " # # # , # # # , # # # , # # # " ) &" Kbyte "
Label1 ( 5) . Caption = Format $ ( MS.dwTotalVirtual /1024 , " # # # , # # # , # # # , # # # " ) &" Kbyte "
Label1 ( 6) . Caption = Format $ ( MS.dwAvailVirtual /1024 , " # # # , # # # , # # # , # # # " ) &" Kbyte "
End Sub
3
tipo " GlobalSystemMemory " (senza virgolette) e premere" Invio ". Questo comando ora mostrerà i dati della memoria di sistema . Digitare in qualsiasi momento per vedere la memoria , e non avrete bisogno di usare di nuovo il codice di installazione lungo .
