La configure así:
Código:
A medida que se van ejecutando los ciclos de la función se va llenando así:frmMenu.tsProgressBarMenu.Visible = True frmMenu.tsProgressBarMenu.Minimum = 0 frmMenu.tsProgressBarMenu.Maximum = CanIng + CanReceta frmMenu.tsProgressBarMenu.Value = 0
Código:
Finalmente cuando termina la pongo invisible.frmMenu.tsProgressBarMenu.Value = frmMenu.tsProgressBarMenu.Value + 1
He revisado en la ultima iteración y el valor maximum de la barra corresponde al valor actual, por ende debería llenarse completamente pero yo alcanzo a ver que va en la mitad y se pone invisible.
PD: el calculo demora tan solo 1 segundo.