Progress bar or function status

[DaveLampron]

Hello,

I have a code module that I run the loops through an
excessive amount of records and performs necessary pieces
of logic. The code takes a few minutes to execute and an
impatient user might get confused and think that the
system has crashed. I would like to display a message or
progress bar that indicates that the system is working and
has not crashed. Any good ideas on how to achieve this?

Thanks,

Dave

 

[Graham Mandeno]

Hi Dave

Do you know when the process starts how many times the loop needs to be
executed (say, how many records are to be processed)?

If so, you can use the built-in progress meter:
SysCmd acSysCmdInitMeter, "Processing... Don't Panic!", MaxCount
For iCount = 1 to MaxCount
' do something
SysCmd acSysCmdUpdateMeter, iCount
Next
SysCmd acSysCmdRemoveMeter

You can also change the cursor to an hourglass:
DoCmd.HourGlass True
...
DoCmd.HourGlass False

--
Good Luck!
Graham Mandeno [Access MVP]
Auckland, New Zealand

Return mail address is invalid in a vain attempt to reduce spam.
Feedback is welcome at: (e-mail address removed)
Please post new questions or followups to newsgroup.

 

[Sandra Daigle]

Take a look at my ProgressMeter sample on www.daiglenet.com/Msaccess. There
are several ways to create/use different types of progress bars.