Visual Basic.NET - progressbar con porcentaje

 
Vista:

progressbar con porcentaje

Publicado por emilio (6 intervenciones) el 02/06/2009 02:37:35
hola. ya se hacer un progressbar con un timer pero ahora quiero que un label muestre el porcentaje. como hago?
el codigo que uso es este.

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Enabled = True
PB.Value = 0
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
With PB
If .Value < .Maximum Then
.Value = .Value + 1
Else
Timer1.Enabled = False
.Maximum = .Value
End If
If Timer1.Enabled = False Then
PB.Visible = False
MessageBox.Show("Backup creado satisfactoriamnete.", "Copia de seguridad", MessageBoxButtons.OK, MessageBoxIcon.Information)
Me.Close()
End If
End With



End Sub


End Class
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:progressbar con porcentaje

Publicado por OliBeer (391 intervenciones) el 03/06/2009 20:14:20
Hola,

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
With PB

'Agrega aquí la Label:

Me.Label1.Text = .Value & " %"

If .Value < .Maximum Then
.Value = .Value + 1
Else
Timer1.Enabled = False
.Maximum = .Value
End If
If Timer1.Enabled = False Then
PB.Visible = False
MessageBox.Show("Backup creado satisfactoriamnete.", "Copia de seguridad", MessageBoxButtons.OK, MessageBoxIcon.Information)
Me.Close()
End If
End With


End Sub

Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar