SysCmd acSysCmdInitMeter

Collapse
This topic is closed.
X
X
 
  • Time
  • Show
Clear All
new posts
  • paii, Ron

    #1

    SysCmd acSysCmdInitMeter

    I use SysCmd to show progress of functions

    ' Show the progress meter

    s = SysCmd(acSysCmd InitMeter, "Process Run " & Count & " Step", Count)

    For i = 0 To Count - 1
    ' Do something

    ' Update the meter
    s = SysCmd(acSysCmd UpdateMeter, i)
    Next

    ' Hide the Meter
    s = SysCmd(acSysCmd SetStatus, " ")

    The problem is Access status information is hidden by the last command.
    How do I hide the progress meter without disabling Access status
    information?


  • Ken Snell

    #2
    Re: SysCmd acSysCmdInitMet er

    s = SysCmd(acSysCmd ClearStatus)


    --

    Ken Snell
    <MS ACCESS MVP>

    "paii, Ron" <paii@packairin c.com> wrote in message
    news:J9KdnXVDEZ 0HhnzfRVn-jQ@athenet.net. ..[color=blue]
    >I use SysCmd to show progress of functions
    >
    > ' Show the progress meter
    >
    > s = SysCmd(acSysCmd InitMeter, "Process Run " & Count & " Step", Count)
    >
    > For i = 0 To Count - 1
    > ' Do something
    >
    > ' Update the meter
    > s = SysCmd(acSysCmd UpdateMeter, i)
    > Next
    >
    > ' Hide the Meter
    > s = SysCmd(acSysCmd SetStatus, " ")
    >
    > The problem is Access status information is hidden by the last command.
    > How do I hide the progress meter without disabling Access status
    > information?
    >
    >[/color]


    Comment

    • paii, Ron

      #3
      Re: SysCmd acSysCmdInitMet er

      Thanks!

      Don't know how I missed it.

      "Ken Snell" <kthsneisllis9@ ncoomcastt.rena etl> wrote in message
      news:VOSdnZ4qMc pbtHzfRVn-pw@comcast.com. ..[color=blue]
      > s = SysCmd(acSysCmd ClearStatus)
      >
      >
      > --
      >
      > Ken Snell
      > <MS ACCESS MVP>
      >
      > "paii, Ron" <paii@packairin c.com> wrote in message
      > news:J9KdnXVDEZ 0HhnzfRVn-jQ@athenet.net. ..[color=green]
      > >I use SysCmd to show progress of functions
      > >
      > > ' Show the progress meter
      > >
      > > s = SysCmd(acSysCmd InitMeter, "Process Run " & Count & " Step", Count)
      > >
      > > For i = 0 To Count - 1
      > > ' Do something
      > >
      > > ' Update the meter
      > > s = SysCmd(acSysCmd UpdateMeter, i)
      > > Next
      > >
      > > ' Hide the Meter
      > > s = SysCmd(acSysCmd SetStatus, " ")
      > >
      > > The problem is Access status information is hidden by the last command.
      > > How do I hide the progress meter without disabling Access status
      > > information?
      > >
      > >[/color]
      >
      >[/color]


      Comment

      • Trevor Best

        #4
        Re: SysCmd acSysCmdInitMet er

        paii, Ron wrote:[color=blue]
        > I use SysCmd to show progress of functions
        >
        > ' Show the progress meter
        >
        > s = SysCmd(acSysCmd InitMeter, "Process Run " & Count & " Step", Count)
        >
        > For i = 0 To Count - 1
        > ' Do something
        >
        > ' Update the meter
        > s = SysCmd(acSysCmd UpdateMeter, i)
        > Next
        >
        > ' Hide the Meter
        > s = SysCmd(acSysCmd SetStatus, " ")
        >
        > The problem is Access status information is hidden by the last command.
        > How do I hide the progress meter without disabling Access status
        > information?
        >
        >[/color]

        s = SysCmd(acSysCmd RemoveMeter)

        --
        [OO=00=OO]

        Comment

        Working...