Process Override

[kpark91]

Hello,

I have two basic buttons:
START and STOP.

When I press START, it takes approximately 5 seconds to perform the process.
However, when I press STOP, it stops after the whole process is done.

Is there a way, I can halt the process during the process?

Thank you.

[HansV]

Does your process involve a loop (For ... Next, or Do ... Loop)?

[kpark91]

Yes. but it also involves lots of other things.

It is recording a data from a machine at a periodic interval.
and it takes approx 5 secs due to timing issues (waiting function)..

[HansV]

You can break out of a loop like this:

Code: Select all

Public blnStop As Boolean

Private Sub cmdStart_Click()
  Dim i As Long
  blnStop = False
  For i = 1 To 1000
    ...
    ...
    ' Give other things a chance
    DoEvents
    If blnStop = True Then
      Exit For
    End If
  Next i
End Sub

Private Sub cmdStop_Click()
  blnStop = True
End Sub

If you have a Do ... Loop loop, use Exit Do instead of Exit For.

If reading data from the machine is a single action, you cannot interrupt that.

[kpark91]

Thank you,
that gave a pretty good idea what I must do.

But it seems I wasn't clear enough (sorry)
I'm having problems clicking the stop button in the first place while the process is running.

How can I make it available for clicking even if there is a process running (not reading but waiting functions and such)..

[HansV]

Are you using Application.Wait? According to the help file, "The Wait method suspends all Microsoft Excel activity", i.e. you won't be able to click the Stop button until the specified time.
If not, DoEvents should give you a chance to click the Stop button. If that doesn't work, the "waiting functions" cannot be interrupted, so you're out of luck.

[kpark91]

I haven't used Application.Wait thankfully.

So, I'll just implement it and get back to you asa I can :P

Thank you, HansV.

[kpark91]

Haven't tried all of the conditional cases (too many -_-)
but it seems to work jsut fine!

Thank you very much HansV!