[RESOLVED] Access - Custom Progressbar

First question: Does MS Access 2002 by default support a picturebox? If yes, then that solves my problem :)

Problem: I have a progressbar on my project. It works like a dream on this machine, however, my bosses don't have the .ocx file to run them, and they also do not have permissions to load it on. I have asked the network admin, but basically I'm screwed.

Is there a way, not using only objects native to VBA/Access 2002 to make a progress bar? If so, think you could tell me which control would be best to use?

Quote:

---

Originally Posted by kfcSmitty

First question: Does MS Access 2002 by default support a picturebox? If yes, then that solves my problem :)

---

I have Access 2003, but according to what I found on Google, the answer to this question is: Yes.

Progress bar here = two boxes. Outer box is etched. Inner box has no edges but a nice colour.

Bot boxes have the left edge at the same place

Work out the percentage to show (0-1)
Multiple the outside's width byt the perc and set the inner box width to that value.

A nice perc bar...

Thanks for the help, both of you :).

I used an Image instead of a Picturebox, and its working great.

Quote:

---

Originally Posted by kfcSmitty

Thanks for the help, both of you :).

I used an Image instead of a Picturebox, and its working great.

---

If it isn't properitary, why don't you post the code you use with your Image Control.

Someone else may find it very useful. :thumb:

Well, I am using ADO to determine the progress steps, and pulling it from another form...But here is the gist of it

VB Code:

'form load
TotalImage.Width = 3000
 
'In a timer -- I didn't use a timer, but for an example, I will just use this
If BarImage.Width >= TotalImage.Width
     BarImage.Width = BarImage.Width + 20
Else
     BarImage.Width = TotalImage.Width
End If

Why not just use the built in system progressbar?

Quote:

---

Originally Posted by RobDog888

Why not just use the built in system progressbar?

---

My bosses dont have the proper .ocx files to run them..and I don't have the priv's to install and register them ;)

Psst - Look at my first post u illiterate pup :afrog:

I no how2 red kfc, but lik I postd u dont ned da ocx when axs has 1 built n. :D

The Access on their compy's don't have a single reference to any kind of progress bar :(

:D

VB Code:

Application.SysCmd acSysCmdInitMeter, "KFC Status:", 1000

VB Code:

Application.SysCmd acSysCmdUpdateMeter, 500

You're wrong RD! I am right! Face it!

*runs away and cries*

:lol: [Nelson]Ha~ha[/Nelson]. Jk. ;)
It should be supported back to Access 97 so you should be safe. :thumb:

always glad to help :D