请教各位高手一个问题

Question

请教各位高手一个问题，在一段代码中，执行完一条语句后，我想等Timer中把一个变量变成某个值再往下执行，我该怎么办？

Answer 1

请教各位高手一个问题，在一段代码中，执行完一条语句后，我想等Timer中把一个变量变成某个值再往下执行，我该怎么办？

Answer 2

如果不用Timer，可以用API作，不过用Timer有个方法很笨，也很简单，用两个Timer，在代码
要等待数值时，启动Timer2，间隔一定时间查一下所查变量，如果变化了，就执行你想用的代码吧

Answer 3

Do
    DoEvents
Loop Until i = 10

Answer 4

都不知道你想干什么？doevents也许可以用，不过如果说执行一行语名后赋一个值给变量得那么麻烦嘛？反正程序执行时都是从上到下的dim i as integer
i=1
msgbox i
i=2
msgbox i

Answer 5

把你想做的事做成一个过程或函数，然后在timer事件中等条件一满足就调用它

Answer 6

例子：Private Sub Command1_Click()
Timer1.Enabled = True
End SubPrivate Sub Timer1_Timer()
Static a
a = a + 1
If a > 100 Then
test
Timer1.Enabled = False
End If
End SubSub test()
MsgBox "条件满足，可以做你想要做的事了。"
End Sub

Answer 7

用一个ＤＯ ＬＯＯＰＴＩＭＥ中用一个全局变量ＤＯ
if 全局变量＝１ then exit do 
loop

Answer 8

要注意由于vb是单线程执行，所以加DoEvents一定是必要的。

Answer 9

执行 (语句 N)
Do
  DoEvents
Loop Until CanResumeNext  ' (=True)
执行 (语句 N+1)Private Sub Timer1_Timer()
  
  CanResumeNext=True
  
End Sub