Я использую такую методику: Заменяю стандартное меню Access своим, в котором включаю кнопку "Служебная", с помощью которой открываю форму, где по паролю можно менять параметры запуска приложения :  CurrentDb.Properties("StartUpShowDBWindow").Value = bolValue
    CurrentDb.Properties("StartUpShowStatusBar").Value = bolValue
    CurrentDb.Properties("AllowShortcutMenus").Value = bolValue ' по желанию
    CurrentDb.Properties("AllowFullMenus").Value = bolValue
    CurrentDb.Properties("AllowBuiltInToolbars").Value = bolValue
    CurrentDb.Properties("AllowToolbarChanges").Value = bolValue
    CurrentDb.Properties("AllowSpecialKeys").Value = bolValue

Значение переменной bolValue считываю из параметра "StartUpShowDBWindow" и инвертирую. Единственное неудобство - после изменения параметров запуска приходится перезапускать приложение, что бы изменения поимели силу.