[VB6] Interrompere un pesante ciclo di elaborazione dati

[Magicolotto]

ciao a tutti

prima di tutto mi scuso per non aver risposto ai vecchi post, ma ho preso un virus ed ho dovuto formattare... per questo avevo problemi


ho una sub_command che elabora con dei contatori le frequenze nelle estrazioni, essendo che l'elaborazione è molto lunga il programma sembra che' va in blocco, vorrei far si che all'utente non sebri un blocco del programma, infatti il form diventa bianco va in crash( in apparenza) quando durante l'elaborazio l'utente clicca col mouse,
come faccio a rendere sempre visibile in form durante l'elaborazione?
e come posso interrempere l'elaborazione del command???


grazie di tuttto.........

[oregon]

Per non dare l'apparenza del blocco, devi inserire una istruzione DoEvents nei cicli piu' pesanti.

Per interrompere l'elaborazione, devi inserire, sempre nel ciclo piu' interno una If che controlli lo stato di una variabile booleana che ti fa uscire dalla Sub se e' messa a True.
E il valore di questa variabile lo cambi tramite un altro Command.

Ma se non inserisci il DoEvents come ti ho detto prima, il tutto non funziona.

[Magicolotto]

ok ci studio stasera


in particolare DoEvents

non l'ho mai studiato questo spero di trovare articoli a riguardo

[Magicolotto]

Static blnProcessing As Boolean
Dim lngCt As Long
Dim intYieldCt As Integer
Dim dblDummy As Double

If blnProcessing Then

blnProcessing = False
Else
cubiregolari.Caption = "Annulla"
blnProcessing = True


'qui codice di elaborazione

DoEvents

blnProcessing = False
cubiregolari.Caption = "Elabora"
MsgBox " operazione eseguite"
End If

HO FATTO cosi solo che non va....

[oregon]

E dov'e' il ciclo "pesante" ??

[Magicolotto]

qui :

http://forum.html.it/forum/showthrea...5&pagenumber=2

la mia penultima risposta

[oregon]

Non mi serve questa risposta .... vorrei vedere dove hai messo l'istruzione DoEvents rispetto al ciclo ... Perche' non fai vedere tutto il codice del ciclo con la DoEvents?

E poi cos'e' che ancora non funzione? Il ridisegno della finestra?

[Magicolotto]

il codice l'ho messo qui :

'qui codice di elaborazione


vedi sopra

doEvent l' messo alla fine del codice

[oregon]

Senti ... se devo impiegare una decina di messaggi per avere una risposta utile, dimmelo prima ... ti avevo chiesto di mostrare il codice del tuo ciclo con la DoEvents per farmi vedere dove lo hai messo ... non voglio altre risposte che vedere il codice ... se non vuoi, beh ... amici come prima ...

Ricordati che ti avevo detto che la

DoEvents

va ALL'INTERNO DEL CICLO e vorrei vedere dove l'hai messa ... se mi scrivi in quel modo "alla fine del codice" e NON E' ALL'INTERNO DEL CICLO allora non va bene ...

[Magicolotto]

ok scusa

ci smanetto un po e ti faro sapere

vorrei capirci

quindi DoEvent , lo inserisco all'interno mi era sfuggito