ControlTipText Coding

[RBDU]

Hello All! Thanking anyone for a reply! A97.

On my search form I have 1 or 2 fields where the user occasionally inputs
text more than the eye can see after entering the details. For these I have
put code, on Enter (works on others) so all the data is shown when browsing
through these fields.
............................................
Private Sub macca_Enter()
Me.macca.ControlTipText = Nz(forms![form3]![macca].value)
End Sub
...........................................
But the users usually tab through the fields and the coding will not work
when tabbing. Is there a way to get it to work just on tabbing.

Regards
Peter McCartney

 

[Al Camp]

RBDU,
Your ControlTipText doesn't display on tabbing because the CTT is
activated by the MouseMove event, not Enter. When the mouse is over the
field (which occurs only when you mouse the cursor into the field) the CTT
shows, after a slight hesitation. Tabbing into a field doesn't activate the
MouseMove event.
CTT is really not meant for "viewing" long text within a confined
control.
Try these different solutions...

On the OnEnter event for the field...(fairly good, but fires every time)
DoCmd.RunCommand acCmdZoomBox
OR...
On the OnEnter event for the field (better, fires only when long data)
If Len(YourFieldName) > 50 Then
DoCmd.RunCommand acCmdZoomBox
End If
OR...
(best, only fires when needed)
Shift-F2
from the keyboard. That's the Access shortcut key to open the Zoom box.

hth
Al Camp
Candia Computer Consulting - Candia NH
http://home.comcast.net/~cccsolutions

 

[RBDU]

Thank You
Peter

RBDU,
Your ControlTipText doesn't display on tabbing because the CTT is
activated by the MouseMove event, not Enter. When the mouse is over the
field (which occurs only when you mouse the cursor into the field) the CTT
shows, after a slight hesitation. Tabbing into a field doesn't activate the
MouseMove event.
CTT is really not meant for "viewing" long text within a confined
control.
Try these different solutions...

On the OnEnter event for the field...(fairly good, but fires every time)
DoCmd.RunCommand acCmdZoomBox
OR...
On the OnEnter event for the field (better, fires only when long data)
If Len(YourFieldName) > 50 Then
DoCmd.RunCommand acCmdZoomBox
End If
OR...
(best, only fires when needed)
Shift-F2
from the keyboard. That's the Access shortcut key to open the Zoom box.

hth
Al Camp
Candia Computer Consulting - Candia NH
http://home.comcast.net/~cccsolutions

Hello All! Thanking anyone for a reply! A97.

On my search form I have 1 or 2 fields where the user occasionally inputs
text more than the eye can see after entering the details. For these I
have
put code, on Enter (works on others) so all the data is shown when
browsing
through these fields.
...........................................
Private Sub macca_Enter()
Me.macca.ControlTipText = Nz(forms![form3]![macca].value)
End Sub
..........................................
But the users usually tab through the fields and the coding will not work
when tabbing. Is there a way to get it to work just on tabbing.

Regards
Peter McCartney