Este codigo me genera un progressbar dentro de una colummna del listview.
Pero ahora no se como introducirle el porcentaje desde fuera de la funcion.
Public Function ListView_AddProgressBar(ByRef pListView As System.Windows.Forms.ListView, ByVal ListViewItemIndex As Integer, ByVal ColumnIndex As Integer) As System.Windows.Forms.ProgressBar
Dim r As Rectangle
Dim pb As New System.Windows.Forms.ProgressBar
r = pListView.Items(ListViewItemIndex).Bounds()
r.Width = pListView.Columns(ColumnIndex).Width
If ColumnIndex > 0 Then
r.X = r.X + pListView.Columns(ColumnIndex - 1).Width
End If
pb.Parent = pListView
pb.SetBounds(r.X, r.Y, r.Width, r.Height)
pb.Visible = True
Return pb
End Function
Llamo a la funcion asi:
ListView_AddProgressBar(ListView1, ListView1.Items(0).Index, ListView1.Columns.IndexOf(Progresos))
la función te esta retornando el progress bar!!!... (Como se nota que no la hiciste vos >:( >:( >:( ).
Es tan sencillo como:
Dim opb As New System.Windows.Forms.ProgressBar
opb = ListView_AddProgressBar(ListView1, ListView1.Items(0).Index, ListView1.Columns.IndexOf(Progresos))
opb.Value = 100
Nota: si hay algun error de sintaxis la corrigen, pues no se mucho vb, yo trabajo con C#.
Atentamente,
Juan Manuel Lombana
Medellín - Colombia
Pues no lo hice yo, solo la uso.
Y gracias por tu respuesta.
hola ^^
a mi no me sale el progressbar
la funsion de opb.value = 100 e para dellar salir el progressbar a 100% o no ?
tienes lla una funsion para cambiar color del progressbar?
gracias ^^
wolas ^^
lla no me serve mas pq aora etoy progamando con el XPTable e es mas facil gracias para todo