以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 计时器问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=44823) |
-- 作者:jnletao -- 发布时间:2014/1/9 16:27:00 -- 计时器问题 我想让代码的执行有个时间间隔,请问如何解决 If icdev > 0 Then e.Form.controls("lbResult").Text = "打开串口成功!" rf_beep(icdev, 15) ‘蜂鸣 ’想在这里加个时间间隔 rf_beep(icdev, 15) ‘蜂鸣 Dim status(30) As Byte For idx = 0 To 29 status(idx) = 0 Next End if
|
-- 作者:jnletao -- 发布时间:2014/1/9 16:27:00 -- 这个代码是 放在 click事件里的 |
-- 作者:jnletao -- 发布时间:2014/1/9 16:35:00 -- |
-- 作者:狐狸爸爸 -- 发布时间:2014/1/9 16:48:00 -- Threading.Thread.Sleep(3000) |
-- 作者:jnletao -- 发布时间:2014/1/9 17:01:00 -- 谢谢狐爸, |