El progressbar tiene tres propiedades importantes , min , max y value...
lo primero que debes saber es el valor maximo , para eso sera en un proceso donde por ejemplo sea una tabla que vas a leer , se determina el tamaño con:
m.tamano=reccount()
m.contador=1
si el tamaño fuese mayor de 0 , es decir existiese informacion entonces :
if m.tamano>0
thisform.barra.visible=.T. && hacerla visible
thisform.barra.min=1 && por defcto siempre 1
thisform.barra.max=m.tamano && el tamaño que hemos determinado
thisform.barra.value=1 && el primer valor (el minimo)
aqui todos los procesos que tengamos que hacer en un bucle generalmente
m.contador=m.contador+1 && se incrementa el valor
thisform.barra.value=m.contador &&se establece el nuevo valor
resto del bucle , es decir un skip 1 y loop
----------
Espero te sirva...