mouse over issues (1 Viewer)

bigmac

Registered User.
Local time
Today, 08:11
Joined
Oct 5, 2008
Messages
295
not sure if this is the right forum, can you help please ,
I have a form [main form] and a subform[subform], on the subform I have a label in the header [lbl22] , what I am trying to achieve is that when the user moves over the label it will open a label [info] on the main form code using so far
Private Sub ClientName_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
info.Visible = True
End Sub
any ideas :confused: please
 

MajP

You've got your good things, and you've got mine.
Local time
Today, 11:11
Joined
May 21, 2018
Messages
8,463
What do you mean by?
open a label [info] on the main form code
Open a label does not make sense.
 

MajP

You've got your good things, and you've got mine.
Local time
Today, 11:11
Joined
May 21, 2018
Messages
8,463
If you mean there is a hidden label on the main form and you want to show it then the code is

me.parent.info.visible = true
 

jdraw

Super Moderator
Staff member
Local time
Today, 11:11
Joined
Jan 23, 2006
Messages
15,364
BigMac

More info please. Can you give an example of what you want to happen?
 

isladogs

MVP / VIP
Local time
Today, 15:11
Joined
Jan 14, 2017
Messages
18,186
I'm also unclear about your aims.
Its certainly possible to show & update the caption on a label as you move the mouse

For example in the 2 screenshots attached I have a form with 18 option buttons for displaying different reports.
As I move the mouse over each button, the text in the footer area is updated and, in my example, a thumbnail image of that report is shown to assist users

Does that help explain the purpose?
 

Attachments

  • Screenshot1.jpg
    Screenshot1.jpg
    91.1 KB · Views: 58
  • Screenshot2.jpg
    Screenshot2.jpg
    85.4 KB · Views: 53

bigmac

Registered User.
Local time
Today, 08:11
Joined
Oct 5, 2008
Messages
295
found this and seems to work


Private Sub lbl122_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
info.Visible = True

Detail_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
info.Visible = False
End Sub
 

Users who are viewing this thread

Top Bottom