Coding a Progress screen

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I would like to create a screen that would display an animation while a process is running in the background. The process takes place outside of ACCESS and happens on a network so it won't be tying up resources on the computer that I want to display the animation

Eventually, ACCESS will open a report with the data that it will retrieve from the network but I want to make sure the network data has time to update to the most current before opening the report

What I've done so far is place 2 pictures on a blank form with no data source. My thoughts were that I'd have a rectangle move from one picture to the other until the background work is done. I've figured out the twips for Top and Left starting position and twips for Top and Left ending posiition

I figured it would only be a matter of taking the difference, dividing by the number of steps I wanted and add that result to the current Top and Left position. Here's the code that I've placed in the Timer event of my form

////code starts////
Private Sub Form_Timer(

Me.Trail.Top = 450
Me.Trail.Left = 580

If Me.Trail.Top <= 2200 The
Me.Trail.Top = 450
Me.Trail.Left = 580
Els
Me.Trail.Top = Me.Trail.Top - 11
Me.Trail.Left = Me.Trail.Left - 16
End I

End Su
////code ends////

I've got a 1000 ms Timer interval set but the cursor doesn't move from the starting position. I've added a Me.Repaint statement but that didn't solve the problem

Is this not possible or am I missing the obvious
 
I have a sample progress box that runs "independent" of whatever else you
do (so, it can run by it self...).

Try downloading my word merge sample at:

http://www.attcanada.net/~kallal.msn/msaccess/msaccess.html

Just run the above app, and you will see a button on the form to test the
progress bar. Also, if you actually try and create a word merge by press the
merge button, then you also will see a progress bar if you click on add new
template.
 
Back
Top