Pytanie Progress bar + statusy

Witam. Chciałbym zrobić takie coś w Group Box'ie: Na początku po otwarciu programu widnieją takie napisy:

Następnie po kliknięciu buttona 'Start' po 1/4 przejściu progressbara Device zmienia się na Android 4.0.2, a po 4/4 Status zmienia się na Success.

Mógłby ktoś tak łopatologicznie rozpisać co mam wkleić i co skopiować? Będę baaaaaardzo wdzięczny!

W labelach na początku jako domyślny tekst ustawiasz Unknown oraz Not Success i kolor tekstu na czerwony.

Wrzucasz timer, progressbar i button.

Do timera:

If progressbar1.value = 25thenLabel1.text = "Android 4.0.2"Label1.ForeColor = Color.GreenEnd ifIf progressbar1.value = 99thenLabel2.text = "Success"Label2.ForeColor = Color.GreenEnd if

Do buttona:

Timer1.Start()If progressbar1.value = progressbar1.maximum then Timer1.Stop()

Public Class Form1    Private Sub GroupBox1_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs)    End Sub    Private Sub ProgressBar1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProgressBar1.Click    End Sub    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick        If ProgressBar1.Value = 25 Then            Label1.Text = "Android 4.0.2"            Label1.ForeColor = Color.Green        End If        If ProgressBar1.Value = 99 Then            Label2.Text = "Success"            Label2.ForeColor = Color.Green        End If    End Sub    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click        Timer1.Start()        If ProgressBar1.Value = ProgressBar1.Maximum Then Timer1.Stop()    End SubEnd Class

Program otwiera się lecz kliknięcie w button nic nie robi. Sory za nieogar, ale wcześniej miałem schemat i tylko wklejałem :/

Może spróbuj wywalić ten dopisek w buttonie If ProgressBar1.Value = ProgressBar1.Maximum Then Timer1.Stop()

Rzeczywiście zapomniałe o najważniejszym w Timerze na samej górze:

ProgressBar1.Increment(1)

Rzeczywiście zapomniałe o najważniejszym w Timerze na samej górze:

PorgrassBar1.Increment(1)

 

A no faktycznie - Xander92 na jakim poziomie znasz VB? I programowanie hacków? Mam pare pomysłu a nie wiem jak wykonać mogę się do Cb zgłosić?

Ok działa. Trzeba było dokładnie dopisać "Handles Timer1.Tick
        ProgressBar1.Increment(1)"

Wygląda to tak:

Public Class Form1    Private Sub GroupBox1_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs)    End Sub    Private Sub ProgressBar1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProgressBar1.Click    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 = 25 Then            Label1.Text = "Android 4.0.2"            Label1.ForeColor = Color.Green        End If        If ProgressBar1.Value = 99 Then            Label2.Text = "Success"            Label2.ForeColor = Color.Green        End If    End Sub    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click        Timer1.Start()        If ProgressBar1.Value = ProgressBar1.Maximum Then Timer1.Stop()    End Sub    Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click    End Sub    Private Sub Label2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label2.Click    End SubEnd Class

A no faktycznie - Xander92 na jakim poziomie znasz VB? I programowanie hacków? Mam pare pomysłu a nie wiem jak wykonać mogę się do Cb zgłosić?

Znam tylko ogólne podstawy. Poprostu mam jakiś pomysł, szukam w internecie rozwiązania i wtedy tworzę

Ale moja wiedza nie wykracza poza proste programowanie