VB5 HiResTimer Full Source Code (26K)
VB6 HiResTimer Full Source Code (29K)
21 Nov 2002
Added a VB6 version of the timer. Note that in the VB6 version, we need to use a Type Library to call the PostMessage Win32 call. This is because the multimedia timer fires on another thread to the VB application, and, as described in Matt Curland's excellent book "Advanced Visual Basic" VB6 uses Thread Local Storage which isn't initialised on receipt of an event from another Thread. As a consequence you can only make calls to methods described in a type library.
vbAccelerator - Contents of code file: frmMessageWindow.frm
VERSION 5.00 Begin VB.Form frmMessageWindow Caption = "Form1" ClientHeight = 870 ClientLeft = 3750 ClientTop = 3630 ClientWidth = 2970 LinkTopic = "Form1" ScaleHeight = 870 ScaleWidth = 2970 End Attribute VB_Name = "frmMessageWindow" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False Option Explicit