VB6.0调用SetTimer实现定时器
发布时间:2020-12-17 07:36:45 所属栏目:百科 来源:网络整理
导读:VB6.0调用SetTimer实现定时器 Timer.bas: Option Explicit Declare Function SetTimer Lib " user32 " ( ByVal hwnd As Long , nIDEvent uElapse lpTimerFunc ) KillTimer Public Sub TimerProc( uMsg idEvent dwTime MsgBox Now() End Sub 窗体代码: Dim l
VB6.0调用SetTimer实现定时器
Timer.bas:
窗体代码:
说明:
TimerProc函数定义一定要放在bas模块文件中,否则运行代码"lngTimerID = SetTimer(0,5000,AddressOf TimerProc)"会报错,
提示:操作符 AddressOf 使用无效。
分类:
代码
好文要顶
关注我
收藏该文
1
0
? 上一篇:
cmd命令控制台窗口一闪就消失解决办法
? 下一篇: 外网SQL服务器设置
posted @
2011-05-27 19:29
MyFavorite 阅读(
4633) 评论(
1)
编辑
收藏
发表评论
講解的很好
(编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |