Always show full menus problem

[arvindn]

Is there a way to always show full menus thru code?

View -> Toolbars -> Customize -> Options tab Always show full menus is to made true thru VBA. (I searched all docmd.runcommand options but was unable to spot it)

Allowfullmenus property of currentdb or the Allow full Menus in startup dialog box do not work for this.

 

[Nero]

The code line you need is

ChangeProperty "AllowFullMenus", DB_BOOLEAN, True

You can use this behind a command button but it will only take effect once you re-open the database.

 

[arvindn]

Thanks Nero but there is a misunderstanding.
I mentioned very explicitly that allowfullmenus is for a different purpose and does not help achieve full dropdown menus. If u are using A2K2 please try it out practically

In View menu -> Toolbars option -> Customize option -> Options tab -> check box names Always show full menus is present.
Check it / Uncheck it and see the difference and what i am trying to achieve.

 

[modest]

For Each prp In CurrentDb.Properties
    Debug.Print prp.Name
Next

Put this in a module and see all the properties you can control. Once you find the property you want to set, you can change it with the following code:

CurrentDb.Properties("<The Property You want to Set>").Value = True/False