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.
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.