Foxtable(狐表)用户栏目专家坐堂 → [讨论]设置代码执行时间


  共有2882人关注过本帖树形打印复制链接

主题:[讨论]设置代码执行时间

帅哥哟,离线,有人找我吗?
lshshlxsh
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:655 积分:7725 威望:0 精华:0 注册:2013/12/11 17:49:00
[讨论]设置代码执行时间  发帖心情 Post By:2014/4/2 19:06:00 [只看该作者]

我有一个事件写了3段代码,希望第一段代码用5秒执行,第二段代码在第六秒开始执行,第三段代码在第十一秒开始执行。请问怎么实现?


 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2014/4/2 19:28:00 [只看该作者]

计时器启用:True

间隔:1000

TimerTick事件:

Dim i As Integer
i + = 1
If i = 5 Then
    MessageBox.Show("第一段代码")
ElseIf i = 6 Then
    MessageBox.Show("第二段代码")
ElseIf i = 11 Then
    MessageBox.Show("第三段代码")
End If


 回到顶部