timer应用问题

[cataclyam2000]

在一个循环中，用timer1来延时，并在每个循环结束时，把循环的运行结果在label1中刷新显示。循环的次数是不定，使用command2的click事件来结束循环。我是为了让循环的结果在label1中显示出来，又要留有时间间隔让循环的节奏不能太快，在每运行一次得到结果后，用定时器来延迟。每次循环后，label1显示出每次循环中得到的结果。

[funboy88]

有没有SLEEP方法，试试

[大智 Kevin]

你描述的不太清楚，不知道下面的能不能帮你的忙？
Dim i
i = Timer
Do While Timer < i + 10
DoEvents
Loop
Label1.Caption = i + 10 & vbCrLf & i