Mouse over popup definition.

  • Thread starter Thread starter pfm721
  • Start date Start date
P

pfm721

I know that you can use the control tip text box to put information that
appears when the mouse is on the text box. Is there any way to have a
different message appear depending on the value of the text box. For instance
I have a box that will Return the letters A through G depening on the status
of a certain object. Is there a way to mouse over the text box and have it
give the status definition of the letter in the text box?
 
I have not try it but I would think that through VBA codes you can change the
text of the tip at the time the event that difines the letters run and then
refresh the from. It should work
 
At the time you are assigning the letter A to G in your textbox, can't you
set the controltipText at the same time ?
e.g.
TextBox="A"
TextBox.ControlTipText = "This is for option A"
 
pfm,
I'm not sure about Access 2007, but in all other versions, the ToolTips
is like a Label control... text only.
You can simulate a tooltip using the MouseMove to display a TextControl
with an IIF statement, to evaluate the A thru G, or as a trigger for module
code that would do the same.
--
hth
Al Campagna
Microsoft Access MVP
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your life."
 
I thought I would post my solution as it ended up being quite helpful. I am
running a modified version of Allen Browne's search form. One of my fields SI
is displayed in txtSI it returns a letter value. Each letter has a specific
definition attached. I loaded this code into the On Mouse Move event
procedure.

Private Sub txtSI_MouseMove(Button As Integer, Shift As Integer, X As
Single, Y As Single)
If txtSI = "A" Then
txtSI.ControlTipText = "Not paid under OPPS. Paid by fiscal
intermediaries"
End If
If txtSI = "B" Then
txtSI.ControlTipText = "Not paid under OPP"
End If
If txtSI = "C" Then
txtSI.ControlTipText = "Inpatient Procedure: Not paid under OPPS, Bill
as Inpatient"

End If

End Sub

There is probably a better way to code the if statements, but it works. This
seems like an easy workable solution to setting up a MOE (mouse over event)
 
Back
Top