The progressbar control is very simple to use.

To illustrate, create a form with two controls: the progressbar and a commandbutton. Also, open a table to scan.

In the commandbutton, use this code:

With thisform.olecontrol1
.min = 0
.max = 100
endwith

currentrec = 0

Select foo && or whatever your table is called

scan
currentrec = currentrec + 1
Thisform.olecontrol1.value = (currentrec/recc())*100
endscan