Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Switchboard ControlTipText 1

Status
Not open for further replies.

hal8000

Programmer
Sep 26, 2000
19
US
I have been reading this board for over a year and have gained a great deal of knowledge while doing so. This is a great place. I just wanted to share and maybe help someone as I have been helped.

Recently I wanted to add floating tips to my menu items in the switchboard. But the form uses the same form for each menu. So, I added a field called [FloatingTip] to the Switchboard table and entered my tips there. Then I added this code to the switchboard form "on current" event. In the sub it calls FillOptions. This is where it fills in the text for each menu item.

While (Not (rs.EOF))
Me("Option" & rs![ItemNumber]).Visible = True
Me("OptionLabel" & rs![ItemNumber]).Visible = True
Me("OptionLabel" & rs![ItemNumber]).Caption = rs![ItemText]
Me("OptionLabel" & rs![ItemNumber]).ControlTipText = _
Nz(rs![FloatingTip])
rs.MoveNext

Now I can have a different Floating tip for each menu item in the switchboard. I know this is fairly simple, but I just wanted to try and return the favors I have received.

jb
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top