[Pytanie] Progress Bar

[Kubiq1]

Witam jak zrobić po naciśnięciu buttona "np patchuj" bede miał progress bara a pod tym chce miec napis :patching status i jak dojdzie np bar do 30% to będzie pisało analyzing a potem patching the game i na koniec na zielono wyswietli się done? Próbowałem swoich sił ale nie ogarniam jak robię label i potem w kodzie to dupa wychodzi. Może mi ktoś podpowiedzieć?

[Gość]

Public Class Form1

 

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

Dim trd As New System.Threading.Thread(Sub()

While True

System.Threading.Thread.Sleep(1)

If ProgressBar1.Value = 30 Then

setLabelText(label1, "wartość to 30")

ElseIf ProgressBar1.Value = 40 Then

setLabelText(label1, "wartość to 40")

End If

End While

End Sub)

trd.IsBackground = True

trd.Start()

End Sub

Delegate Function __setLabelText(lbl As Label, tekst As String)

Function _setLabelText(lbl As Label, tekst As String)

lbl.Text = tekst

End Function

Function setLabelText(lbl As Label, tekst As String)

If lbl.InvokeRequired Then

lbl.Invoke(New __setLabelText(AddressOf _setLabelText), lbl, tekst)

Else

_setLabelText(lbl, tekst)

End If

End Function

End Class

 

[Kubiq1]

Dzięki ! , a wiesz np jak zrobić jak mam program i żeby u góry były zakładki typu settings itp ?

[Gość]

Dzięki ! , a wiesz np jak zrobić jak mam program i żeby u góry były zakładki typu settings itp ?

Myślę, że chodzi Ci o menustrip.

[Kubiq1]

Tak dzieki wielkie za pomoc )) jak bede na kompie dam Ci limit. Pozdro