VB6 - Interrompi operazione

[Ciucianespoi]

Salve a tutti. È da alcuni giorni che cerco di risolvere un problema ... ma invano.
Devo esportare in excel dei dati. Mentre il programma li sta esportando (tramite Do While ... Wend) ho una form che mi dice a che punto è l'esportazione. In questa form ho messo anche un tasto annulla che ha lo scopo di interrompere in qualsiasi momento l'operazione.

Mentre Do while ... wend sta lavorando, per far intercettare l'evento di interruzione dell'operazione ho inserito la funzione DoEvents. Tutto funziona, solo che dopo aver eseguito il DoEvents, il codice riprende il ciclo Do While da dove l'aveva interrotto.

Come faccio a uscire da questo vicolo cieco?

Sperando di essere riuscito a farmi capire, un saluto e un ringraziamento anticipato a chi mi risponde

[MMarzia]

per VB c'è l'apposito subforum: ti sposto lì

[xegallo]

exit do

p.s. non usare while wend che non lo usa + nessuno usa
do while loop

[Ciucianespoi]

Innanzitutto grazie per la risposta ... C'è una cosa però che non capisco.

La struttura del mio codice è:

Do While Not MioRecordset.EOF
...
DoEvents
...
Loop

Il comando ExitDo deve succedere solo se clicco sul comando 'Interrompi'. Chiaramente ExitDo non posso metterlo semplicemente dopo la funzione DoEvents perché altrimenti il ciclo si interromperebbe al primo giro.
Il concetto è: dove e come devo mettere ExitDo?

Grazie per la risposta e buona giornata.

Daniele

[xegallo]

bAnnulla = false
do until condizione
   if bAnnulla = true then
       exit do
   end if
' normale iterazione
   doevents
loop

poi nel pulsante non devi fare altro che valorizzare bAnnulla a true

[Ciucianespoi]

Grazie infinite!

Buona giornata.

Daniele