Dostosuj wygląd progressbara do swoich potrzeb.

2 Grudnia 2013

Musicie przyznać, że domyślny progressbar w Visual Studio jest nudny. Wielu z was się pewnie przejadł. Mam na to świetne, a jednocześnie proste rozwiązanie.

1. Stwórz nowy projekt w Visual Studio.

2. Na formę wrzuć:

-button

-picturebox

-timer

3. Ustaw wielkość i położenie picturebox-a tak jak zrobiłbyś to dla progressbar-a. Przykład

4. Ustaw atrybut background na kolor pasujący z twoim tłem(u mnie nie jest dopasowane).

5. Skopiuj Picturebox-a. Dla Picturebox2 ustaw atrybut visible na false.

6. Stwórz obrazek wielkości picturebox-a w programie graficznym, ja użyłem gimpa i opcji wypełnienie gradientem. Następnie ustaw go pod atrybut BackgroundImage. Tak to powinno wyglądać:

8. Skopiuj wartość atrybutu location Picturebox1. Następnie ustaw identyczną dla Picturebox2.

9.Ustaw atrybut size(zmieniamy tylko szerokość czyli pierszą zmienną) na 2(Jeśli Picturebox1 ma tą zmienną nie parzystą to ustaw na 1)

9.Do buttona wrzuć



timer1.start()

10.Do timera wrzuć



PictureBox2.Visible = True

        PictureBox2.Width = PictureBox2.Width + 2

        If PictureBox2.Width = PictureBox1.Width Then

            Timer1.Stop()

            MsgBox("Grubyportfel pozdrawia")

        End If

11.Skompiluj program

12.Kliknij w button i ciesz się efektem

13. Kliknij przycisk aby zachęcić mnie do robienia nowych poradników.

Efekt:

Plik do pobrania:


http://speedy.sh/ehXha/WindowsApplication2.rar

Skan:


http://goo.gl/AgCnTx

2 Grudnia 2013

Myślę, że dodatkowo możesz wrzucać przykładowy plik przedstawiony na filmie.

2 Grudnia 2013

Myślę, że dodatkowo możesz wrzucać przykładowy plik przedstawiony na filmie.

Bardzo dobry pomysł.

2 Grudnia 2013

Wielce przydatne dla mnie to będzie. Ostatnio właśnie się zastanawiałem jak zmienić sobie progressbara na jakiś inny.

Hapaj lajka. Dzięki

2 Grudnia 2013

Przyda się! Dzięki:D

telephone majne taptalk

1.1 tys. · 3 Grudnia 2013

niezłe, ale brakuje mi napisów

4 Grudnia 2013

niezłe, ale brakuje mi napisów

Nie rozumiem gdzie i jak Ci brakuje napisów.

Co za problem dodać jakieś napisy np. pod progressbarem? Czy chodzi Ci o coś innego?

Ciapkniete z mobajla

Edytowane 4 Grudnia 2013 przez Crissco

1.1 tys. · 4 Grudnia 2013

taki napis np. connecting (1-4 sekundy postępu paska), pozniej np. verify data (4-6 sekunda), connected (6-7 sekunda) i cos tam jeszcze wedle uznania

4 Grudnia 2013

Takie rzeczy co właśnie wymagasz są do znalezienia w poradnikach jakiś o visualu. Zajrzyj do tego tematu i poczytaj poradnik. http://make-cash.pl/jak-zrobi%C4%87-hackkeygen-pdf-t1345/

Pamiętam, że w tym poradniku było coś o tych napisach właśnie, a być może dowiesz się jeszcze czegoś innego.

1.1 tys. · 15 Grudnia 2013

poradzilem sobie. dzieki

15 Grudnia 2013

Dzięki Pięknie działa!

22 Stycznia 2014

Jak ktoś chce zmienić kolor progressbaru na taki jak w tej aplikacji

To udostępniam kod,ten kod wklejamy do przycisku gdzie mamy start timera,trójka w tym kodzie oznacza kolor progressbaru w tym przypadku kolor żółty,aby zmienić żeby kolor progressbaru był czerwony wystarczy za trójkę dać dwójkę.

SendMessage(ProgressBar1.Handle, 1040, 3, 0)

Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As Integer) As Integer

To wklejamy przed Public Class Form1

A tutaj daje cały kod aplikacji

Public Class Form1    Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As Integer) As Integer    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load    End Sub    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click        Timer1.Start()        SendMessage(ProgressBar1.Handle, 1040, 2, 0)    End Sub    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click        Timer2.Start()        SendMessage(ProgressBar2.Handle, 1040, 3, 0)    End Sub    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick        ProgressBar1.Increment(1)        If ProgressBar1.Value = 101 Then            Timer1.Stop()        End If    End Sub    Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick        ProgressBar2.Increment(1)        If ProgressBar2.Value = 101 Then            Timer2.Stop()        End If    End SubEnd Class

20 Lutego 2014

Powiedzmy że będę chciał zrobić że niby gra się pobiera to ten progress bar trochę za szybko idzie, da się go jakoś spowolnić?

20 Lutego 2014

@up - > http://make-cash.pl/jak-zrobi%C4%87-bardziej-wiarygodny-progressbar-tutorial-t1040/

ja mam ptanie, jak podpiąc progress bar z innego skina pod inny ? da radę tak ? dwóch skinów dodać nie idzie jako osobne klasy albo wywala błąd a chciał bym teoretycznie połączyć kilka skinów w jeden : D Takie wycinki, inny button inny progress itp, najbardziej zalezy mi na progressbarze