Progress meter or Counter 1

[MarkRobinson]

I'm running a VB program in access and I want to display some kind of counter on the form showing that I'm working. Progress meter - counter - something very simple if fine.
Any suggestions?

 

[Steve101]

I'll assume that your form is called frmYourForm.

(a) Place an unbound text control on the form. Name it txtCounter, and set its Locked Property to True and Enabled property to false.

(b) Prior to the loop in the code, initialise the counter; eg.
Forms!frmYourForm!txtCounter = 0

(c) Within the loop, incriment the counter; eg.

Forms!frmYourForm!txtCounter = Forms!frmYourForm!txtCounter + 1

(d) At the end of the loop, clear the counter; eg.
Forms!frmYourForm!txtCounter = Null

After each of the above assignments, add the following line, to ensure that the form display updates:

Forms!frmYourForm.Repaint

Alternatively, you may also find it useful to use the syscmd method, to show status information on the status line at the bottom of the screen. See Access online help for more info, and examples on how to use this.

Hope this helps,


Steve Lewy
Solutions Developer
steve@lewycomputing.com.au
(dont cut corners or you'll go round in circles)

 

[MarkRobinson]

Perfect!
Thanks. Sometimes the answer is so simple. I appreciate the help