>SET CLASSLIB TO PROGBAR.VCX Additive
>oProgBar = CREATEOBJECT('ProgBar')
> [snip ]
>oProgBar.SetRange(nTop, nEnd)
> [ snip ]

>nEnd greater than 4 million
>
>How can I change the rate of the progress bar output?

There are limits to the mininum and maximum values in SetRange. These are documented in the chm help file that comes with commctrl itself. You can find the chm help file in commctrl.zip, which is included in progbar.zip. Quoting: "The minimum value in the range can be from 0 to 65,535. Likewise, the maximum value can be from 0 to 65,535. If you do not set the range values, the system sets the minimum value to 0 and the maximum value to 100. You can adjust the range to convenient integers by using the SetRange method."

Also the SetStep() method may be of interest to you when working with with a range this large.