按键精灵-----按钮控制（开始子程序）的时候是要用到多线程的

  // 按钮开始子程序的时候是要用到多线程的

// 没有播放的状态，但是已经运行了
      // 用全局变量控制主程序暂停

Event Form1.Button1.Click
线程ID1=BeginThread (脚本1)
End Event


Sub 脚本1()
Do
i=i+1
Delay 1000
Call Plugin.Msg.Tips(i)
Loop 
End Sub