how to enable a menu in the access by vba 2

[horoscope]

i have created my own menu, but at beginnig of running time,i wish it can disable .if the user gives the right accountname and password ,then the menu can enable.
who know how disable and enable one menu by vba in access.

 

[chrissie1]

I think this works, i tried it in access 2002
you can also make them invisible if you want and even disable and enable menu items

Private Sub disable_Menu_custom_1()
CommandBars("custom 1&quot.Enabled = False
End Sub

Private Sub enable_menu_custom_1()
CommandBars("custom 1&quot.Enabled = True
End Sub