CREAR CONTROL PROGRESS BAR EN TIEMPO EJECUCION
Publicado por FREDY (2 intervenciones) el 17/04/2020 01:16:37
COMO PUEDO CREAR UN CONTROL PROGRESBAR EN TIEMPO DE EJECUCION HE CREADO ESTE CODIGO PERO NO SE MUESTRA NADA
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Dim Progressbar1 As New ProgressBar
Progressbar1.Visible = True
Progressbar1.Name = "Progressbar1"
Progressbar1.Maximum = 10
Progressbar1.Width = 100
Progressbar1.Height = 150
Progressbar1.Style = ProgressBarStyle.Blocks
Progressbar1.Location = New Point(20, 200)
Me.Controls.Add(Progressbar1)
' timer1.Start()Progressbar1.Visible = True
' For j = 1 To 10 'Progressbar1.Value = j ' NextProgressbar1.Visible = False
Progressbar1.Value = 0
End Sub
Valora esta pregunta
0
