Witam w kolejnym moim poradniku.
Pokażę Wam jak stworzyć Progress Bar w Visual Basic. Zainspirowałem się poradnikiem autorstwa usera Grubyportfel, który możecie znaleźć tutaj: http://make-cash.pl/dostosuj-wygl%C4%85d-progressbara-do-swoich-potrzeb-t2470/
Dosyć tego wstępu, zaczynamy.
1. Uruchamiamy Visual Basic, tworzymy nowy projekt. Wrzucamy: Button, Progress Bar, Timer oraz PictureBox.
2. Dla PictureBox oraz ProgressBar zmieniamy pozycję Visible na False, w okienku Properties po prawej na dole. Oraz dla ProgressBar zmieniamy wartość maximum na "546"
3. Kod dla Button:
Timer1.Start()
4. Kod dla Timera:
ProgressBar1.Increment(21) PictureBox1.Visible = False If PictureBox1.Width > 0 Then PictureBox1.Visible = True PictureBox1.Width = ProgressBar1.Value If ProgressBar1.Value = 546 Then Timer1.Stop() End If
Liczba 21 onacza szerokość jednego prostokąta i połowy przerwy między nim a następnym. Dzięki temy pasek ładuje się pokazując kolejne prostokąty, a nie ładując po kolei kolejne piksele.
Przygotowałem dla Was taką grafikę z ProgressBarem:
- bez tła:
- z szarym tłem:
A co jeśli chemy zmienić kolor grafiki żeby dopasować kolorystycznie Wasz ProgressBar do naszego programu?
To również przewidziałem. Pomoże nam w tym prosty edytor graficzny online.
1. Wchodzimy na poniższy adres:
http://www160.lunapic.com/editor
2. Stosujemy się to napisów na obrazkach:
3. Zapisujemy grafikę i gotowe!
Finalny efekt: