Progress Bar....how?

T

TJ

Hi,

I am using MS-ACCESS 2003.
I placed MS Progress Bar Control 6.0 on the form.

Dim currentWorking as Boolean

Private Sub StartProgress()
currentWorking = True
While currentWorking
ProgressBarControlInstance.Value = i
i = i + 1
If i > ProgressBarControlInstance.Max Then
i = 1
End If
Wend

End Sub

Private Sub FinishProgress()

End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Progress Bar..how? 1
VBA Export to PDF 0
asnyc? progress bar? 1
Trying to remove error from conflicting code 0
Making a macro only work on certain files 2
Macro to Select text from a point given to a specific word 2
Word macro that can call cells out of Excel for a find and replace 0
How to Create an S-Curve from Custom Field? 0

Top