Hallo,
Ich hab mir mal gedacht, dass ich ein kleines Tutorial darüber mache wie man die CPU- und RAM- Auslastungen in einer Progressbar bzw. einem Label anzeigen lässt.
Desweiteren zeige ich hier noch wie man den Freien Speicher einer Festplatte bzw. Laufwerks anzeigen lässt.
Dann fangen wir mal an:
=============================================================
Die Form
=============================================================
Spoiler anzeigen
Für alles benötigt ihr:
*) 5 PerformanceCounter
So heißen sie bei mir:
-PcCPU1
-PcCPU2
-PcCPU3
-PcCPU4
-PcRam
*) 3 Timer
*) 5 ProgressBars
*) 6 Label
*) 5 Label (zur beschriftung)
*) 1 ComboBox
Die Form kann z.B. so aussehen:
(Wie ihr seht ist bei mir der BorderStyle auf None dadurch kann man die Form nicht verschieben. Damit ihr sie doch verschieben könnt müsst ihr diesen Code hinzufügen) :
Jetzt erstellen wir noch Variablen:
Und wir müssen noch die Timer beim Programmstart starten:
/Edit:
Schalten Option Strict auf on (thx: ~blaze~)
Das könnt ihr unter: Extras -> Optionen -> Projekt und Projektmappe -> VBStandard
=============================================================
PerformanceCouter/Timer
=============================================================
Spoiler anzeigen
PcCPU1:
-CategoryName: Prozessor
-CounterName: Prozessorzeit (%)
-InstanceName: 0
PcCPU2:
-CategoryName: Prozessor
-CounterName: Prozessorzeit (%)
-InstanceName: 1
PcCPU3:
-CategoryName: Prozessor
-CounterName: Prozessorzeit (%)
-InstanceName: 2
PcCPU4:
-CategoryName: Prozessor
-CounterName: Prozessorzeit (%)
-InstanceName: 3
PcRam:
-CategoryName: Arbeitsspeicher
-CounterName: Verfügbare MB
Timer1:
-Interval: 500
-Enabled: false
Timer2:
-Interval: 25
-Enabled: false
Timer3:
-Interval: 10
-Enabled: false
Ihr könntet die Cores auch zählen mit:
=============================================================
CPU Auslastung anzeigen lassen
=============================================================
Spoiler anzeigen
Dazu müssen wir erst die Auslastung der CPU herraus finden. Dies erledigt der Timer1.
Nun haben wir sie herraus gefunden jetzt müssen wir sie nurnoch anzeigen lassen. Dies erledigt der Timer2.
Für diesen Schritt gibt es aber auch eine zweite Methode die sehr viel einfacher ist. Doch bei dieser Methode füllen sich die Progressbars nicht so flüssig wie bei der Ersten.
Natürlich kann man die Anzahl der einzelnen Cores auch herraus finden. Dazu gib es diesen Code: (Thx ~Blaze~)
Dann müsst ihr hald alles in If-Schleifen setzen.
=============================================================
RAM Auslastung anzeigen lassen
=============================================================
Spoiler anzeigen
Hier müssen wir einfach die einzelnen Timer ergänzen:
Um die Auslastung des Arbeitsspeichers herraus zu finden fügen wir diesen Code zu Timer1_tick hinzu:
Damit wir die Auslastung auch angezeigt wird fügen wir diesen Code zu Timer2_tick hinzu:
Für die Anzeige der % in den Labels:
=============================================================
Freien Speicher der jeweiligen Festplatte anzeigen lassen
=============================================================
Spoiler anzeigen
Dazu benötigen wir das Label mit dem text "Select Drive" und die ComboBox.
Das Label nennt ihr am besten um in: Label_drive
Nun ergänzt ihr Form1_Load mit diesem Code:
Zuletzt kommen wir zum Timer3. Dieser findet den freien Speicher der Ausgewählten Festplatte/Laufwerk herraus und zeigt ihn in einem Label an:
Das wars auch schon.
Ich hoffe ich konnte euch mit diesem Tutorial über: "RAM- CPU Auslastung und Freien Speicherplatz der Festplatten" helfe.
Bei fragen bitte einfach melden
Ich hab mir mal gedacht, dass ich ein kleines Tutorial darüber mache wie man die CPU- und RAM- Auslastungen in einer Progressbar bzw. einem Label anzeigen lässt.
Desweiteren zeige ich hier noch wie man den Freien Speicher einer Festplatte bzw. Laufwerks anzeigen lässt.
Dann fangen wir mal an:
=============================================================
Die Form
=============================================================
Für alles benötigt ihr:
*) 5 PerformanceCounter
So heißen sie bei mir:
-PcCPU1
-PcCPU2
-PcCPU3
-PcCPU4
-PcRam
*) 3 Timer
*) 5 ProgressBars
*) 6 Label
*) 5 Label (zur beschriftung)
*) 1 ComboBox
Die Form kann z.B. so aussehen:
(Wie ihr seht ist bei mir der BorderStyle auf None dadurch kann man die Form nicht verschieben. Damit ihr sie doch verschieben könnt müsst ihr diesen Code hinzufügen) :
VB.NET-Quellcode
- Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove
- If (e.Button = Windows.Forms.MouseButtons.Left) Then
- Me.Capture = False
- Me.WndProc(Message.Create(Me.Handle, &HA1, CType(&H2, IntPtr), IntPtr.Zero))
- End If
- 'Dieser Code ist dafür da, dass man die Form auch wenn sie im BorderStyle None ist bewegen kann.
- End Sub
Jetzt erstellen wir noch Variablen:
Und wir müssen noch die Timer beim Programmstart starten:
/Edit:
Schalten Option Strict auf on (thx: ~blaze~)
Das könnt ihr unter: Extras -> Optionen -> Projekt und Projektmappe -> VBStandard
=============================================================
PerformanceCouter/Timer
=============================================================
PcCPU1:
-CategoryName: Prozessor
-CounterName: Prozessorzeit (%)
-InstanceName: 0
PcCPU2:
-CategoryName: Prozessor
-CounterName: Prozessorzeit (%)
-InstanceName: 1
PcCPU3:
-CategoryName: Prozessor
-CounterName: Prozessorzeit (%)
-InstanceName: 2
PcCPU4:
-CategoryName: Prozessor
-CounterName: Prozessorzeit (%)
-InstanceName: 3
PcRam:
-CategoryName: Arbeitsspeicher
-CounterName: Verfügbare MB
Timer1:
-Interval: 500
-Enabled: false
Timer2:
-Interval: 25
-Enabled: false
Timer3:
-Interval: 10
-Enabled: false
Ihr könntet die Cores auch zählen mit:
=============================================================
CPU Auslastung anzeigen lassen
=============================================================
Dazu müssen wir erst die Auslastung der CPU herraus finden. Dies erledigt der Timer1.
Nun haben wir sie herraus gefunden jetzt müssen wir sie nurnoch anzeigen lassen. Dies erledigt der Timer2.
VB.NET-Quellcode
- 'Jetzt "füllt" der Timer die Progressbars mit der Auslastung der CPU.
- Try 'Die Try sind dazu da, dass wenn man nicht so viele Cores hat dass keine Errors kommen.
- If ProgressBar1.Value < core1 Then
- ProgressBar1.Value += 1
- ElseIf ProgressBar1.Value > core1 Then
- ProgressBar1.Value -= 1
- End If
- Catch ex As Exception
- End Try
- Try
- If ProgressBar3.Value < core2 Then
- ProgressBar3.Value += 1
- ElseIf ProgressBar3.Value > core2 Then
- ProgressBar3.Value -= 1
- End If
- Catch ex As Exception
- End Try
- Try
- If ProgressBar4.Value < core3 Then
- ProgressBar4.Value += 1
- ElseIf ProgressBar4.Value > core3 Then
- ProgressBar4.Value -= 1
- End If
- Catch ex As Exception
- End Try
- Try
- If ProgressBar5.Value < core4 Then
- ProgressBar5.Value += 1
- ElseIf ProgressBar5.Value > core4 Then
- ProgressBar5.Value -= 1
- End If
- Catch ex As Exception
- End Try
- 'Und Hier werd noch mal die prozent in labels dagestellt.
- Try
- Label3.Text = ProgressBar1.Value.ToString + "%"
- Label5.Text = ProgressBar3.Value.ToString + "%"
- Label7.Text = ProgressBar4.Value.ToString + "%"
- Label9.Text = ProgressBar5.Value.ToString + "%"
- Catch ex As Exception
- End Try
Für diesen Schritt gibt es aber auch eine zweite Methode die sehr viel einfacher ist. Doch bei dieser Methode füllen sich die Progressbars nicht so flüssig wie bei der Ersten.
Natürlich kann man die Anzahl der einzelnen Cores auch herraus finden. Dazu gib es diesen Code: (Thx ~Blaze~)
Dann müsst ihr hald alles in If-Schleifen setzen.
=============================================================
RAM Auslastung anzeigen lassen
=============================================================
Hier müssen wir einfach die einzelnen Timer ergänzen:
Um die Auslastung des Arbeitsspeichers herraus zu finden fügen wir diesen Code zu Timer1_tick hinzu:
Damit wir die Auslastung auch angezeigt wird fügen wir diesen Code zu Timer2_tick hinzu:
Für die Anzeige der % in den Labels:
=============================================================
Freien Speicher der jeweiligen Festplatte anzeigen lassen
=============================================================
Dazu benötigen wir das Label mit dem text "Select Drive" und die ComboBox.
Das Label nennt ihr am besten um in: Label_drive
Nun ergänzt ihr Form1_Load mit diesem Code:
Zuletzt kommen wir zum Timer3. Dieser findet den freien Speicher der Ausgewählten Festplatte/Laufwerk herraus und zeigt ihn in einem Label an:
VB.NET-Quellcode
- Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
- Dim Drive As Long
- Try
- Drive = My.Computer.FileSystem.GetDriveInfo(ComboBox1.SelectedItem).AvailableFreeSpace / 1000000000 'Hier wird der Freie Speicher herraus gefunden und in GB "konvertiert"
- 'Nun wird der freie Speicher in dem Label_drive angezeigt
- Label_drive.Text = Drive & ".0 GB frei"
- Catch ex As Exception
- End Try
- End Sub
Das wars auch schon.
Ich hoffe ich konnte euch mit diesem Tutorial über: "RAM- CPU Auslastung und Freien Speicherplatz der Festplatten" helfe.
Bei fragen bitte einfach melden
Dieser Beitrag wurde bereits 5 mal editiert, zuletzt von „Gather“ ()