Aprendendo ProgressBar (2 Modos de Fazer)

por **Vector** Seg Fev 06, 2012 10:57 am

Bom Pessoal Hoje eu Venho Trazer Mais um Tutorial Para Iniciantes e um Pouco de Intermediário Talvez.

Bom Vamos Lah...

Vídeo Aula em HD:

Tutorial:

Adicione:
1 Button (Modo 1)
1 Timer (Modo 1 & 2)
1 Label(Modo 2)

Códigos:

Modo 1:
Button:
Código:
Timer1.start

Timer:
Código:
ProgressBar1.Increment(1) If ProgressBar1.Value = ProgressBar1.Maximum Then Timer1.Stop() End If

Modo 2:
Timer:
Código:
ProgressBar1.Increment(1) Label1.Text = ProgressBar1.Value & "%" If ProgressBar1.Value = ProgressBar1.Maximum Then Me.Hide() Form2.Show() Timer1.Stop() End If