How to display in Status Bar

I have inserted a status bar in my Form, Now I want that for every menu item, The status bar should display a text as the standard windows program do.
How to do that, also for the tool bar buttons, message(like menu)
fmuftiAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

HATCHETCommented:
For anything but a standard Visual Basic menu, it's easy.  Put the following code in the MouseMove event of the ToolBar, CommandButton, or other misc control :

Status1.Panels(1).Text = "Hello"

As far as the menus, there's no MouseMove event... just Click event.  You'll have to sub-class the menus or get a custom control to sub-class it for you.  I'm not gunna touch that for 10 points... but look at the following web page for a control called "cPopMenu" that does this for you :

http://www.vbAccelerator.com/codelib/cpopmenu/article.htm

Good luck,

HATCHET
0
HATCHETCommented:
( See previous comment for the answer )
0
fmuftiAuthor Commented:
What about menus there is no easy way?????
0
cvidlerCommented:
simply no - no easy way for menus - may Microsoft will fix that in a leter version of VB
0
HATCHETCommented:
fmufti,

My answer was correct.  There is no other way.  You have to subclass the menu system of the form in question to find out the mouse movements and mouse clicks on the menu items.  The VBAccelerator ActiveX does a great job of doing this for you, or you can look into Non-FREE versions of the same thing.  Sorry... that's just how MicroCRAP did it.   =]

HATCHET
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Visual Basic Classic

From novice to tech pro — start learning today.