Create a form and put a progress bar on it (call it ProgressBar1)
In the long loop you are showing progress put code like this
for lngTrial = 1 to NumberOfTrials
' increment and update progress bar
'
lngProgress = lngTrial * 100 / NumberOfTrials ' this makes a "%
complete"
frmProgressBar.ProgressBar1.Value = lngProgress ' update the progress
bar
next lngTrial
Good Luck,
Mark
--
_________________________________________________________
Mark Durrenberger, PMP
Principal, Oak Associates, Inc,
www.oakinc.com
"Advancing the Theory and Practice of Project Management"
________________________________________________________
The nicest thing about NOT planning is
that failure comes as a complete surprise and is not
preceded by a period of worry and depression.
- Sir John Harvey-Jones
Evan S. Dictor said:
I would like to make use of the progress bar that sometimes appears in
Microsoft Project through the object model (from VB in my case). Does anyone
know of a way to do so?