Progress Bar

[Highlander]

Hola quisiera implementar un Progress Bar pero no me queda claro la manera de hacerlo, mi idea es que el Progress Bar se llene a medida que se ejecuta una función.

Esto necesito implementarlo sin un background worker (que es lo encuentro cuando busco información al respecto) quiero que la aplicación permanezca "bloqueada" hasta que termine la función con su Progress Bar.

Saludos y gracias por cualquier sugerencia.

[Fernando_net]

Hola

Que necesitas exactamente? Dependiendo de lo que buscas, la implementación puede ser de una forma u otra.

Lo que te tiene que quedar claro es que la barra de progreso tiene tres propiedades que son muy importantes y que son:

Minimum --> Es el valor con el que inicia la barra (normalmente 0)
Maximum --> Es el valor máximo de la barra y con el que se terminará la carga
Value --> Es el valor actual de la barra y que nunca puede ser superior al Maximum

Dicho esto, tienes que ir jugando con la propiedad Value mientras estás haciendo tu proceso, es decir...

Yo lo que hago es dividir la barra en tantas partes como procesos tengo para que se llene, es decir, si tengo que cargue 5 procesos (carga_nombre, carga_apellido, carga_domicilio, carga_edad y carga_ciudad) y el valor Maximum es 100, pues hago lo siguiente:

Código vb:

public sub cargadatos()
     'pongo los parametros de la barra de progreso
     progressbar1.minimum=0
     progressbar1.maximum=100
     progressbar1.value=0
 
     'incremento la barra conforme voy haciendo los procesos
     nombre=carga_nombre()
     progressbar1.value=progressbar1.value + 20
 
     apellido=carga_apellido()
     progressbar1.value=progressbar1.value + 20
 
     domicilio=carga_domicilio()
     progressbar1.value=progressbar1.value + 20
     
     edad=carga_edad()
     progressbar1.value=progressbar1.value + 20
 
     ciudad=carga_ciudad()
     progressbar1.value=progressbar1.value + 20
 
     'una vez ha terminado el proceso, escondo la barra
     progressbar1.visible = false
end sub
 

Si te fijas, el 20 sale de dividir 100 (el Maximum) entre 5 procesos que tengo, para que se llene de forma equilibrada.

Espero que te sirva de ayuda.

Saludos

[Highlander]

Gracias me sirvió tu explicación es bien clara, saludos.

Iniciado por Fernando_net

Hola

Que necesitas exactamente? Dependiendo de lo que buscas, la implementación puede ser de una forma u otra.

Lo que te tiene que quedar claro es que la barra de progreso tiene tres propiedades que son muy importantes y que son:

Minimum --> Es el valor con el que inicia la barra (normalmente 0)
Maximum --> Es el valor máximo de la barra y con el que se terminará la carga
Value --> Es el valor actual de la barra y que nunca puede ser superior al Maximum

Dicho esto, tienes que ir jugando con la propiedad Value mientras estás haciendo tu proceso, es decir...

Yo lo que hago es dividir la barra en tantas partes como procesos tengo para que se llene, es decir, si tengo que cargue 5 procesos (carga_nombre, carga_apellido, carga_domicilio, carga_edad y carga_ciudad) y el valor Maximum es 100, pues hago lo siguiente:

Código vb:

public sub cargadatos()
     'pongo los parametros de la barra de progreso
     progressbar1.minimum=0
     progressbar1.maximum=100
     progressbar1.value=0
 
     'incremento la barra conforme voy haciendo los procesos
     nombre=carga_nombre()
     progressbar1.value=progressbar1.value + 20
 
     apellido=carga_apellido()
     progressbar1.value=progressbar1.value + 20
 
     domicilio=carga_domicilio()
     progressbar1.value=progressbar1.value + 20
     
     edad=carga_edad()
     progressbar1.value=progressbar1.value + 20
 
     ciudad=carga_ciudad()
     progressbar1.value=progressbar1.value + 20
 
     'una vez ha terminado el proceso, escondo la barra
     progressbar1.visible = false
end sub
 

Si te fijas, el 20 sale de dividir 100 (el Maximum) entre 5 procesos que tengo, para que se llene de forma equilibrada.

Espero que te sirva de ayuda.

Saludos