【VB】VB SetTimer 生成定时器函数功能详解

VB SetTimer 生成定时器函数功能详解，VB SetTimer 生成定时器函数详解，VB SetTimer 生成定时器功能详解，VB SetTimer 生成定时器函数，VB SetTimer 生成定时器详解，VB SetTimer 定时器函数详解，VB SetTimer 定时器函数，VB SetTimer 定时器详解，VB SetTimer 函数详解，VB SetTimer 定时器，VB SetTimer 函数，VB SetTimer 详解，VB SetTimer，WM_TIMER，hwnd '窗口句柄，nIDEvent '定时器ID，多个定时器时，可以通过该ID判断是哪个定时器，uElapse'时间间隔，单位为毫秒，lpTimerFunc'回调函数。

VB SetTimer 生成定时器函数功能详解

函数原型：
Private Declare Function SetTimer Lib "user32" (ByVal hwnd As Long, ByVal nIDEvent As Long, ByVal uElapse As Long, ByVal lpTimerFunc As Long) As Long

参数说明：
    hwnd               '窗口句柄
    nIDEvent           '定时器ID，多个定时器时，可以通过该ID判断是哪个定时器
    uElapse            '时间间隔,单位为毫秒
    lpTimerFunc        '回调函数

使用示例：
SetTimer m_hWnd, 1, 1000, NULL '一个1秒触发一次的定时器

函数说明：
当使用SetTimer函数的时候，就会生成一个计时器。函数中nIDEvent指的是计时器的标识，也就是名字。nElapse指的是时间间隔，也就是每隔多长时间触发一次事件。

第三个参数是一个回调函数，在这个函数里，放入你想要做的事情的代码，你可以将它设定为NULL，也就是使用系统默认的回调函数，系统默认认的是onTime函数。这个函数怎么生成的呢？你需要在需要计时器的类的生成onTime函数。

在ClassWizard里，选择需要计时器的类，添加WM_TIME消息映射，就自动生成onTime函数了。然后在函数里添加代码，让代码实现功能。

每隔一段时间就会自动执行一次。

SetTimer计时器是系统资源，使用完毕应及时用KillTimer销毁，关于SetTimer的返回值：如果hWnd为NULL，返回值为新建立的timer的ID，如果hWnd非NULL，返回一个非0整数，如果SetTimer调用失败则返回0 ，简言之，SetTimer的返回值用于将来的销毁。

改变计时器的时间间隔：如果想将一个已经存在的计时器设定为不同的时间间隔，可以简单地用不同的时间值再次调用SetTimer。

计时器并不精确，有两个原因：
    原因一：
    Windows计时器是硬件和ROM BIOS架构下之计时器一种相对简单的扩充。回到Windows以前的MS-DOS程序写作环境下，应用程式能够通过拦截者称为timer。
    tick的BIOS中断来实现时钟或计时器。一些为MS-DOS编写的程序自己拦截这个硬件中断以实现时钟和计时器。这些中断每54.915毫秒产生一次，或者大约每秒18.2次。这是原始 IBM PC 的微处理器频率值4.772720 MHz被218所除而得出的结果。

在 Windows 98 中，计时器与其下的PC计时器一样具有55毫秒的解析度。在Microsoft Windows NT中，计时器的解析度为10毫秒。Windows应用程式不能以高于这些解析度的频率（在Windows 98下，每秒18.2次，在Windows NT下，每秒大约100次）接收WM_TIMER消息。在SetTimer中指定的时间间隔总是截尾后tick数的整数倍。例如，1000毫秒的间隔除以54.925毫秒，得到18.207个tick，截尾后是18个tick，它实际上是989毫秒。对每个小于55毫秒的间隔，每个tick都会产生一个WM_TIMER消息。

可见，计时器并不能严格按照指定的时间间隔发送WM_TIMER消息，它总要相差那么几毫秒。

即使忽略这几个毫秒的差别，计时器仍然不精确，请看原因二。

原因二：
WM_TIMER消息放在正常的消息队列之中，和其他消息排列在一起，因此，如果在SetTimer中指定间隔为1000毫秒，那么不能保证程序每1000毫秒或者989毫秒就会收到一个WM_TIMER消息。如果其他程序的执行事件超过一秒，在此期间内，您的程式将收不到任何WM_TIMER讯息。事实上，Windows对WM_TIMER消息的处理非常类似于对WM_PAINT消息的处理，这两个消息都是低优先级的，程序只有在消息队列中没有其他消息时才接收它们。

WM_TIMER还在另一方面和WM_PAINT相似：Windows不能持续向消息队列中放入多个WM_TIMER讯息，而是将多余的WM_TIMER消息组合成一个消息。因此，应用程序不会一次收到多个这样的消息，尽管可能在短时间内得到两个WM_TIMER消息。应用程序不能确定这种处理方式所导致的WM_TIMER消息「遗漏」的数目。

可见，WM_TIMER消息并不能及时被应用程序所处理，WM_TIMER在消息队列中的延误可能就不能用毫秒来计算了。

由以上两点，你不能通过在处理WM_TIMER时一秒一秒计数的方法来计时。如果要实现一个时钟程序，可以使用系统的时间函数如GetLocalTime，而在时钟程序中，计时器的作用是定时调用GetLocalTime获得新的时间并刷新时钟画面，当然这个刷新的间隔要等于或小于1秒。

函数示例：
　　1.不用回调函数：
　　SetTimer(1,1000,NULL);
　　1 计时器的名称；
　　1000 时间间隔，单位是毫秒；
　　NULL 使用onTime函数。
　　当不需要计时器的时候调用KillTimer(nIDEvent);
　　例如：KillTimer(1);

　　2.调用回调函数：
　　此方法首先写一个如下格式的回调函数
    Private Function Test()
        MsgBox "test"
    End Sub
    然后再用SetTimer(1, 100, Test)函数来建一个定时器，第三个参数就是回调函数地址。

如果我要加入两个或者两个以上的 timer怎么办？继续用SetTimer函数吧，上次的timer的ID是1，这次可以是2，3，4。。。。

　　SetTimer(2,1000,NULL);
SetTimer(3,500,NULL);

WINDOWS 会协调他们的。当然onTimer函数体也要发生变化，要在函数体内添加每一个timer的处理代码。

文章目录