Stephen Lebans clsToolTip for Access version 1.4

[RobXMiller]

To allow for enhanced custom Tooltips for Access Form controls

This is a nice class object for creating a custom tooltip with VBA for use in Access.
Alas, Stephen Lebans web page has since retired.

The code worked on a Citrix server with a Windows Server 2003 OS on Access 2007
Testing it with the lastest Windows Server and Access 2010 - it failes.

My guess is that Windows Server 2008 may not support native user32?
Any ideas? The Tool tip is just awesom for users.

Private Declare Function apiGetScrollInfo _
Lib "user32" Alias "GetScrollInfo" (ByVal hWnd As Long, _
ByVal n As Long, lpScrollInfo As SCROLLINFO) As Long
Private Declare Function GetWindowRect Lib "user32" _
(ByVal hWnd As Long, lpRect As RECT) As Long
Private Declare Function ClientToScreen Lib "user32" _
(ByVal hWnd As Long, lpPoint As POINTAPI) As Long
Private Declare Function ScreenToClient Lib "user32" _
(ByVal hWnd As Long, lpPoint As POINTAPI) As Long
Private Declare Function DeleteDC Lib "gdi32" (ByVal hDC As Long) As Long