Building custom menus and commandbars

[Jerry]

I have an A2K database that I build custom menus in each
time the application is opened (see code below) which
works fine. My problem is that the menu is not accessible
by pressing the alt key and the letter such as &File. Is
there a property that I should set to activate the alt
capabaility?

'Build menu bar
Public IAScmdbar As CommandBar

Set cmdbar = CommandBars.Add(Name:="IAS Menus",
Position:= _
msoBarTop, MenuBar:=True, Temporary:=False)
cmdbar.Visible = True
' Prevent users from undocking the menu bar.
cmdbar.Protection = msoBarNoMove
Set IAScmdbar = CommandBars(cmdbar.Name)

'Build File menu
Set MBarCtl = IAScmdbar.Controls.Add
(Type:=msoControlPopup)
MBarCtl.Caption = "&File"

Thanks in advance for any help!
Jerry