Amed писал(а):Судя по всему, просто так менять цвет стандартного ProgressBar'а нельзя, нужно лезть в дебри API. Но Z-zzz подсказал выход: попробуй сделать ProgressBar вот так:
'Клади на форму Timer Timer1 и PictureBox pb
'Надеюсь, ты понял принцип его действия? =)
Private Sub Timer1_Timer()
Static i As Integer
pb.Line (0, 0)-(pb.Width / 100 * i, pb.Height), RGB(255, 0, 0), BF
i = i + 1
If i = 100 Then i = 0
End Sub
Сейчас этот форум просматривают: Google-бот, Yandex-бот и гости: 12