Sub SetText(t As Int)
Log("SetText: " & t)
Label1.Text = "Count: " &t
End Sub
Sub Run
For i=0 To 10
Log("Run" & i)
CallSubDelayed2(Me,"SetText", i )
Next
End Sub
Sub BtnStart_Click
For i=0 To 100
Log("Click: " & i)
CallSubDelayed(Me, "Run")
Next
End Sub