Hallo Forum
Ich hab mal wieder ein Problem. Und zwar wollte ich die Farben einer Progressbar ändern in Rot, Gelb, Grün. Den Code habe ich bereits dafür gefunden und entsprechend angepasst, nur wenn der Wert der Progressbar wieder sinkt sagen wir mal auf unter 60 verändert sich die Farbe nicht mehr in Grün. Hier mal mein Code :
Für jede Hilfe dankbar
Gruß OneWorld
Ich hab mal wieder ein Problem. Und zwar wollte ich die Farben einer Progressbar ändern in Rot, Gelb, Grün. Den Code habe ich bereits dafür gefunden und entsprechend angepasst, nur wenn der Wert der Progressbar wieder sinkt sagen wir mal auf unter 60 verändert sich die Farbe nicht mehr in Grün. Hier mal mein Code :
VB.NET-Quellcode
- If ProgressBar3.Value < ProgressBar3.Maximum Then
- If ProgressBar3.Value < 60 Then
- SendMessage(ProgressBar1.Handle, &H400 + 16, &H1, 0) 'Grün
- ElseIf ProgressBar3.Value > 60 And ProgressBar3.Value < 64 Then
- SendMessage(ProgressBar3.Handle, &H400 + 16, &H3, 0) 'Gelb
- ElseIf ProgressBar3.Value > 85 And ProgressBar3.Value < 99 Then
- SendMessage(ProgressBar3.Handle, &H400 + 16, &H2, 0) 'Rot
- End If
- End If
Für jede Hilfe dankbar
![:thumbsup:](https://www.vb-paradise.de/wcf/images/smilies/thumbsup.png)
Gruß OneWorld
![](https://dl.dropboxusercontent.com/u/59960797/VB-Paradise.de/Profile/favicon_3_32x32x32.png)