状态栏随菜单变化

[sdming]

怎样实现状态栏随着光标在菜单上的移动而变化？各位大虾多指教！

[playyuer]

例子再详细点,完整点!Thank you! ^_^

[oo渣渣oo]

关键在于你想怎么变化?

[Un1]

需要Hook WM_MENUSELECT消息或者activebar2：

'Subclass callback
Private Sub Subclass1_WndProc(Msg As Long, wParam As Long, lParam As Long, Result As Long)
Dim Status As String

If Msg = WM_MENUSELECT Then 'Only message for this demo
Select Case wParam And &HFFFF&
'0 = No menu
'The following values are defined by Visual Basic
'They always start from 1 and increment through each menu item
'1 = File menu
Case 2
Status = "Exit this program"
'3 = Edit menu
Case 4

[sdming]

I will test it ,thank you