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 .
sistemi © www.354353.com