[Okta Webinar] Learn how to a build a cloud-first strategyRegister Now

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 161
  • Last Modified:

mouseover

I want to show text in a label.caption whenever the mouse is over a command button on a form.  Is this possible?
0
Daron1
Asked:
Daron1
  • 4
  • 2
1 Solution
 
Gotcha007Commented:
you can use the MouseMove fonction for the command button (Switch to the code windows ,Choose in object listbox your command button and in the function listbox choose mousemove)

when the mouse is on the button this fonction is activated.
and in this fonction you can write a text to your label.
0
 
Daron1Author Commented:
Private Sub command1_MouseMove()
Label4.Caption = "label text."
End Sub

I tried this but get a compile error:

"Procedure declaration does not match description of event or procedure having the same name."
0
 
Daron1Author Commented:
Adjusted points from 30 to 40
0
What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

 
MarineCommented:
The problem is in your event declaration
its like this.

Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.Caption = "WHATEVER"
End Sub
0
 
Daron1Author Commented:
I guess I need to do the same for the mouseout, right?  This enables the label to be reset to "" or whatever default.
0
 
MarineCommented:
Points are not mine but this is not a website where you can use javascript command mouseout() vb doesn't have that event. What you can do is you can set up a boolean value to see if value has left has changed. Good luck.
0
 
Daron1Author Commented:
I got a slight JavaScript habit, sorry about that. :)  Thanks.
0

Featured Post

Prep for the ITIL® Foundation Certification Exam

December’s Course of the Month is now available! Enroll to learn ITIL® Foundation best practices for delivering IT services effectively and efficiently.

  • 4
  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now