Results 1 to 1 of 1

Thread: [FAQ's: OD] How do I use Access' built-in progressbar?

  1. #1

    Thread Starter
    Ex-Super Mod RobDog888's Avatar
    Join Date
    Apr 2001
    Location
    LA, Calif. Raiders #1 AKA:Gangsta Yoda™
    Posts
    60,709

    [FAQ's: OD] How do I use Access' built-in progressbar?

    About Access' Progress Meter (progressbar):

    Using the SysCmd method you can pass the proper parameters to show/hide and control the system progressbar.

    Access 2000 and above, *.mdb's only

    acSysCmdInitMeter: Initializes the progressbar. You must specify the parameter2 and parameter3 parameters when you use this action.
    acSysCmdSetStatus: Sets the status bar text to the text argument.
    acSysCmdUpdateMeter: Updates the progressbar with the specified value. You must specify the caption/text parameter when you use this action.
    acSysCmdRemoveMeter: Removes the progressbar.


    To show and initialize the progressbar:
    First, the acSysCmdInitMeter parameter will initialize and show the meter. You can pass a caption/text as the second parameter. And finally, the third parameter is the max value for the progressbar.


    VB Code:
    1. Application.SysCmd acSysCmdInitMeter, "RobDog888 Status:", 1000




    To change its values:
    First, the acSysCmdUpdateMeter parameter specifies an update operation which takes different second and third parameters as compared to the acSysCmdInitMeter parameter. The second parameter is the value of the progressbar.


    VB Code:
    1. Application.SysCmd acSysCmdUpdateMeter, 500




    Finally, to clear or hide the progressbar just call the method passing the acSysCmdRemoveMeter parameter.

    VB Code:
    1. Application.SysCmd acSysCmdRemoveMeter
    Last edited by RobDog888; Oct 29th, 2006 at 04:08 PM.
    VB/Office Guru™ (AKA: Gangsta Yoda®)
    I dont answer coding questions via PM. Please post a thread in the appropriate forum.

    Microsoft MVP 2006-2011
    Office Development FAQ (C#, VB.NET, VB 6, VBA)
    Senior Jedi Software Engineer MCP (VB 6 & .NET), BSEE, CET
    If a post has helped you then Please Rate it!
    Reps & Rating PostsVS.NET on Vista Multiple .NET Framework Versions Office Primary Interop AssembliesVB/Office Guru™ Word SpellChecker™.NETVB/Office Guru™ Word SpellChecker™ VB6VB.NET Attributes Ex.Outlook Global Address ListAPI Viewer utility.NET API Viewer Utility
    System: Intel i7 6850K, Geforce GTX1060, Samsung M.2 1 TB & SATA 500 GB, 32 GBs DDR4 3300 Quad Channel RAM, 2 Viewsonic 24" LCDs, Windows 10, Office 2016, VS 2019, VB6 SP6

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width