Rss & SiteMap

金字塔客服中心 - 专业程序化交易软件提供商 http://www.weistock.com/bbs/

专业程序化软件提供商
共3 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:SetTimer(ID, Elapse)

1楼
siteng 发表于:2013/3/22 13:23:42
请问客服,ID这个参数怎么用?
2楼
rushtaotao 发表于:2013/3/22 13:27:38
客户有问题 先对论坛进行一下搜索,你提过的问题可能以前已经有人提过,直接找答案用就是了

Sub Application_VBAStart()

    Call Application.SetTimer(0,2*1000)      '设置一个0号计时器,间隔2秒执行一次
    Call Application.Settimer(9,5*1000)      '设置一个9号计时器,间隔5秒执行一次
End Sub
 
'下面的过程是计时器循环体,我让计时器显示每次触发的时间,你看看是不是间隔设定的秒数就触发。 
Sub Application_Timer(ID)
    If ID=0 then
        Application.msgout Cdate(time) & ",0号计时器触发了"
    end if
    If ID=9 then
        Application.msgout Cdate(time) & ",9号计时器触发了"
    end if
End Sub
[此贴子已经被作者于2013-3-22 13:28:27编辑过]
3楼
siteng 发表于:2013/3/22 13:29:33
非常详细,敬礼!嗨希特勒!
[此贴子已经被作者于2013-3-22 13:30:48编辑过]
共3 条记录, 每页显示 10 条, 页签: [1]


Powered By Dvbbs Version 8.3.0
Processed in 0.02734 s, 2 queries.