Depending what you process is and what you have called your progress bar etc...

Say you are looping through records in a table, you would set .Max to the number of records then as you loop through the table increment the lnNewValue issue something like this...

THISFORM.oleProgress.Value = lnNewValue