>>Bruce,
>>Are you sure ? I do it. Example below (works) :
>>

scan
>>  thisform.oTools.statusbar.value = recno()*100/reccount()
>>endscan

>>Cetin
>
>Cetin, are we talking about the same thing? I've added the activex status bar to a toolbar, but there is no value property...
Bruce first I understood it as progressbar, but Microsoft Status Bar Control 5.0 SP2 also work.

select customer
scan
  =inkey(0.001)
  thisform.oTools.statusbar.value = recno()*100/reccount() && Progress bar
  thisform.oTools.sbar.panels(3).text = ltrim(str(recno()))+"/"+ltrim(str(reccount()))  && Status bar
endscan

It's too late for me today. If you wish notify me and I'll send you tbr class and sample form.
Cetin