>1) Define the appearance you want.
>2) Set the Min value to 1 and the Max value to reccount() or whatever dictates the operations ceiling.
>3) Set the value to 0.
>4) Increment value as you step through your records.
>
>Example:
>
>with ThisForm
>.ProgressBar.Min = 1
>.ProgressBar.Max = reccount("table")
>.ProgressBar.Value = 0
>
>scan
>.ProgressBar.Value = recno()
>
>*!* Other processing.
>endscan
>endwith
Neil, this is a good example of how the ProgressBar control bumps things, but the RECNO()/RECCOUNT() choices aren't too helpful in many cases. RECNO() won't help a bit if the table/cursor you SCAN through has an index on it; the Progress Bar will jump around all over the place, since RECNO() is an absolute reference to the record's physical position in the file. RECCOUNT() as a top limit isn't wonderful either, especially for a filtered result set, where RECCOUNT() returns the total number of records in the base table, not the number of records in the resultset.