Access2010三个超难的问题

wx0000888

寻遍Access2010所有资料，未能解决这三个难题：
一，自定义快速访问工具栏， 如何禁用（不是隐藏）？

二，最近使用文档数量，用这个"Size of MRU File List"设置没有用（低版本的有用），2010还是显示4个。
       其他的都能隐藏了，但唯独这4个未能找到方法隐藏，本人估计是微软的工作人员不待见我们这些所谓的vba爱好者，留个大尾巴。

三，如果用Access2010开发软件，总不能自定义的功能菜单会被隐藏吧，最好是 一直最大化，也就是不能把这个功能区隐藏，一直展开着。 在窗体上按导航按钮时，显示不同的自定义功能区，但一直展开。

tmtony

MRU 可用代码 清注册表

wx0000888

Private Const lngMaxAccDisplay As Long = 0
Private Sub regMaxAccDisplay()          '重新注册 显示最近使用数据库的最大数量
   
Dim regAcc As Object
Dim regPath As String
Dim Type_Name As String
Dim Key_Name As String
Dim Key_Data As Long

Set regAcc = CreateObject("Wscript.Shell")

regPath = "HKEY_CURRENT_USER\Software\Microsoft\Office\14.0\Access\File MRU\"
Type_Name = "REG_DWORD"
Key_Name = "Max Quick Access Display"
Key_Data = lngMaxAccDisplay

regAcc.regWrite regPath & Key_Name, Key_Data, Type_Name

Set regAcc = Nothing
  
End Sub

总感觉还是要找到access2010内置的方法比较好。

zpy2

不错，收藏。