code for progress bar

M

miruna

I'm trying to show the progress of a macro and I have
include in my form a progress bar. Can someone help me to
make it to work?

thx in advance
 
K

Kevin

Try using a sample progress bar from this site...
http://www.datastrat.com/Download2.html

Download the <<ProgressBark2K>> database and see if that helps. I just hide
the text boxes and set the form timer to count up to 100. I like it better
than using ActiveX. Just experiment with it.

-Kevin
 
A

ALESSANDRO Baraldi

miruna said:
I'm trying to show the progress of a macro and I have
include in my form a progress bar. Can someone help me to
make it to work?

thx in advance

You have many kind of way to reproduce Progress_Bar.
My favorite is using ComCtl32.dll.
Readin in www.mvps.com Access Links you can find many
running exemple.

Alessandro.(IT)
 
J

john

ia am john from Greece

It's more simple to insert an ActiveX object names "Microsoft Progress Bar" into your form.
Set the name of the progress bar from the properties sheet (for example fmProgressBar) and write a simple code in VBA

fmProgressBar.Value = 0 'initialize
fmProgressBar.Max = 50
for i=0 to 50
fmProgressBar.Value = i
for j=0 to 2000 'just delay
next j
next i
 
S

Scott McDaniel

This is assuming you have the license for this control. You can certainly
use it on your machine, but if you don't have the license to distribute it,
when you transfer your db to another machine you'll run into troubles.
Better, by far, to use the API calls or build your own with textboxes and
labels.

john said:
ia am john from Greece

It's more simple to insert an ActiveX object names "Microsoft Progress Bar" into your form.
Set the name of the progress bar from the properties sheet (for example
fmProgressBar) and write a simple code in VBA
 

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

Top