troubleshooting Question

faster version of controltip to display tooltip text

Avatar of rberke
rberkeFlag for United States of America asked on
Microsoft Access
29 Comments2 Solutions4596 ViewsLast Modified:
On my machine with access 2003, controltip takes about 5 seconds to display, which is annoying.

So, I am looking for a simple way to speed things up.   A tools option (or even a registry hack) changing the 5 second delay to a 1 second delay would be great.

But, since I don't know how to do this, the attached code using the mousemove event is the best I can come up with.
There are several problems
#1,  Every form needs its own control named "myToolTip"
#2,  I would like to code the mousemove events to be =tooltipper() instead of =tooltipper("form","controlname").
      I tried saying =tooltipper(Me), but that does not work.
#3,  The tooltipper subroutine runs about 500 times a second for as long as the mouse is in the control

I hope someone can help

Option Compare Database
Option Explicit
Function tooltipper(ctl, ctlName)
Dim myMe, myCtl
If TypeName(ctl) = "String" Then
    Set myCtl = Forms(ctl)
    Set myCtl = ctl
End If
Debug.Print ctlName & Now()
Set myMe = myCtl.Controls(ctlName)
' MsgBox myctl.FormName
With myCtl.[myToolTip]
    .Caption = myMe.ControlTipText
    .Top = myMe.Top - 300
    .Left = myMe.Left
End With
End Function

Our community of experts have been thoroughly vetted for their expertise and industry experience.

Join our community to see this answer!
Unlock 2 Answers and 29 Comments.
Start Free Trial
Learn from the best

Network and collaborate with thousands of CTOs, CISOs, and IT Pros rooting for you and your success.

Andrew Hancock - VMware vExpert
See if this solution works for you by signing up for a 7 day free trial.
Unlock 2 Answers and 29 Comments.
Try for 7 days

”The time we save is the biggest benefit of E-E to our team. What could take multiple guys 2 hours or more each to find is accessed in around 15 minutes on Experts Exchange.

-Mike Kapnisakis, Warner Bros