473,321 Members | 1,748 Online
Bytes | Software Development & Data Engineering Community
Post Job

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 473,321 software developers and data experts.

Using progress Bar

abouddan
Hi all
I have an access2000 database and I am trying to use a progress bar in a form.
What I need is the following:

In a form let's call it 'form1' I have a command button 'Command1' that opens a report 'Report1'. How can I use the progress bar that shows the real time needed to open the report?
Mar 2 '07 #1
5 4064
Rabbit
12,516 Expert Mod 8TB
At the beginning of the code for the command button click, store the time. Then at the end, compare it to the time using DateDiff.
Mar 2 '07 #2
ADezii
8,834 Expert 8TB
Hi all
I have an access2000 database and I am trying to use a progress bar in a form.
What I need is the following:

In a form let's call it 'form1' I have a command button 'Command1' that opens a report 'Report1'. How can I use the progress bar that shows the real time needed to open the report?
Here is a Basic Template for the use of a Progress Bar. It loops through a Recordset and Updates the Progress Bar accordingly. If you need any further assistance or explanation as to how this code functions, feel free to ask. First of all:
__1 Insert ==> ActiveX Control ==> Microsoft ProgresssBar Control
__2 Position & Resize Control as needed.
__3 Rename Control to ProgressBar1

Expand|Select|Wrap|Line Numbers
  1. Dim MyDB As Database, MyRS As Recordset, intNoOfRecords As Long
  2. Dim intRandomRecordNumber, intCounter As Long
  3.  
  4. Set MyDB = CurrentDb
  5. Set MyRS = MyDB.OpenRecordset("tblEmployees", dbOpenDynaset)
  6. MyRS.MoveLast: MyRS.MoveFirst
  7.  
  8. intNoOfRecords = MyRS.RecordCount          'will be the Maximum Value of the Bar
  9.  
  10. Me!ProgressBar1.Min = 1                            'Minimum Value
  11. Me!ProgressBar1.Max = intNoOfRecords      'Maximum Value
  12.  
  13. Do While Not MyRS.EOF
  14.    intCounter = intCounter + 1
  15.       'do some processing here...
  16.       Debug.Print UCase$(MyRS![LastName]) & " - " & Mid$(MyRS![LastName], 2, 4)
  17.       Me!ProgressBar1.Value = intCounter
  18.          MyRS.MoveNext
  19. Loop
  20.  
  21. MyRS.Close
NOTE: You could also use the Status Bar of Access as a Progress Bar. If you need further details, let me know.
Mar 2 '07 #3
Many thanks for your support Adezii

Yes please I would like to know more about the status bar as progress bar.
Mar 5 '07 #4
Dear Adezii

The code you sent is clear, but what I want to ask about is: where must I insert this code keeping in mind that I want that progress bar to run when openning a form or report?
Mar 5 '07 #5
Rabbit
12,516 Expert Mod 8TB
You would put the code in the same section as the code that opens the form/report. Or you could put it in the On Open event of the form/report.
Mar 5 '07 #6

Sign in to post your reply or Sign up for a free account.

Similar topics

5
by: Ilan Sebba | last post by:
When it comes to adding records in related tables, Access is really smart. But when I try to do the same using ADO, I am really stupid. Say I have two parent tables (eg Course, Student) and one...
4
by: Raed Sawalha | last post by:
Dear, I have windows form , the form is using a class to do all tasks needed like this private void btnProcess_Click(object sender, System.EventArgs e) { btnProcess.Enabled = false;...
0
by: Lokkju | last post by:
I am pretty much lost here - I am trying to create a managed c++ wrapper for this dll, so that I can use it from c#/vb.net, however, it does not conform to any standard style of coding I have seen....
0
by: Micus | last post by:
Hi all, Does anyone have experience with using a palette with a progress control? Everything works fine with a scrollbar control, but I think there are issues with the progress control because it's...
3
by: Brian Birtle | last post by:
**** A CHALLENGE TO THE GURUS - refute the statement "It's impossible to build a file upload progress meter using ASP.NET" **** First person to prove me wrong gets "All Time .NET Programming GOD"...
4
by: pmcguire | last post by:
Rather than putting a progress bar on all of my forms to show progress during time consuming tasks, I made a form called frmProgress with 2 controls, a Label and a ProgressBar. Suppose I expose 1...
1
by: scorpion53061 | last post by:
this code came from cor and I think Armin authored it. I am trying to download an access database and track its progress. It is reading the size fo the file but I am unsure of how to get the...
12
by: JMB | last post by:
Hello, I was wondering if anyone knew of any projects extending the inline upload progress bar to utilize an inpage image uploader with bar, without having to refresh or go to a seperate page,...
2
by: Dr_PoLish (the schnitzel) | last post by:
Hey, I've been developing an app that would basically clone the functionality that apt-get does for debian and port it to windows. Yes, the whole deal - repositories, .deb clones (in this case,...
1
by: edinwoking | last post by:
Hi I have been struggling to get a toolbar to update its progress information from an event raised ina parallel for loop. I have tried using delegates to get it to work but it just hangs after...
0
by: DolphinDB | last post by:
Tired of spending countless mintues downsampling your data? Look no further! In this article, you’ll learn how to efficiently downsample 6.48 billion high-frequency records to 61 million...
1
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM). In this month's session, we are pleased to welcome back...
0
by: Vimpel783 | last post by:
Hello! Guys, I found this code on the Internet, but I need to modify it a little. It works well, the problem is this: Data is sent from only one cell, in this case B5, but it is necessary that data...
0
by: jfyes | last post by:
As a hardware engineer, after seeing that CEIWEI recently released a new tool for Modbus RTU Over TCP/UDP filtering and monitoring, I actively went to its official website to take a look. It turned...
1
by: CloudSolutions | last post by:
Introduction: For many beginners and individual users, requiring a credit card and email registration may pose a barrier when starting to use cloud servers. However, some cloud server providers now...
1
by: Defcon1945 | last post by:
I'm trying to learn Python using Pycharm but import shutil doesn't work
1
by: Shællîpôpï 09 | last post by:
If u are using a keypad phone, how do u turn on JavaScript, to access features like WhatsApp, Facebook, Instagram....
0
by: Faith0G | last post by:
I am starting a new it consulting business and it's been a while since I setup a new website. Is wordpress still the best web based software for hosting a 5 page website? The webpages will be...
0
isladogs
by: isladogs | last post by:
The next Access Europe User Group meeting will be on Wednesday 3 Apr 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome former...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.