Stack overflow decrementando valore ValueBox

[kicco]

 
Ho sintetizzato il problema con questo esempio. Mi va in stack overflow al valore 7870.
Avete suggerimenti?
 

[Gianluigi]

Il codice da te proposto ha il difetto di richiamare se stesso fino all'esaurimento della memoria.
Prova così:

Codice: [Seleziona]

Private $iCount As Integer

Public Sub Button1_Click()

  $iCount = ValueBox1.Value
  For i As Integer = $iCount To 0 Step -1
    ValueBox1.Value = i
    Wait 0.005
  Next

End

Public Sub Form_Open()

  ValueBox1.Value = 10000

End

 

[kicco]

Grazie Capitano, ci devo lavorare ed adattarlo.
 

[Gianluigi]

Grazie Capitano, ci devo lavorare ed adattarlo.
 

Prego, nota che del contatore globale puoi benissimo farne a meno (ero partito con un'idea diversa)