how is the "stop" button telling the loop to break? Like this? :

VB Code:
  1. Dim stopLoop As Boolean

  2.  
  3.   Do Until x=5 'whatever you use

  4.     DoEvents

  5.     If stopLoop = True Then

  6.       Exit Do

  7.     End If

  8.     

  9.     'do whatever

  10.   Loop

  11.  
  12. Private Sub cmdStop_Click()

  13.   stopLoop = True

  14. End Sub

like that?