no mi spiego meglio facendo un altro esempio.
Ammettiamo di avere una sub Prova e al suo interno c'è in ciclo do-loop
Public Sub Prova(ByVal i As Integer)
Do Until p >= 50000
p = p + 1
Form1.Label1(i).Caption = p
DoEvents
Loop
End Sub
poi da form richiamo la sub prova passando 0, 1, ecc
IL PROBLEMA
se richiamo Prova 0 parte a contare ma se lancio Prova 1 si ferma Prova 0 e aspetta che finisce
|