ACCESS进销存管理系统 access进销存实例

在学习进销存管理的ACCESS数据开发过程中，王晟和韩泽坤编著的教材里，没有详细介绍如何把操作菜单添加到Ribbon中。查询关于RibbonX的相关知识，特别是CSDN博主狂奔之林发布的博客，经过不断尝试，最终制作出了和教材所示一样的功能区。
 
 测试十四： 在一个组内使用box元素，使用box元素的水平排列功能

<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui">
  <ribbon startFromScratch="false">
    <tabs>
      <tab id="dbCustomTab" label="加载项" visible="true">
            <group id="myGroup1" label="自定义功能栏">
               <box id= "myBox1"  boxStyle=" horizontal "  visible="true">
                 <menu id="dbCustomMenu1" label="进货管理">
                    <button id="RunMyMacro1" label="进货单" onAction="系统菜单_进货管理"/>
                </menu>
                <menu id="dbCustomMenu2" label="销售管理">
<button id="RunMyMacro2" label="销售单" onAction="系统菜单_销售管理"/>
                </menu>
                <menu id="dbCustomMenu3" label="库存管理">
                   <button id="RunMyMacro3" label="库存查询" onAction="系统菜单_库存管理"/>
                </menu>
                <menu id="dbCustomMenu4" label="系统管理">
                   <button id="RunMyMacro4" label="权限设置" onAction="系统菜单_系统管理"/>
                </menu>
                <menu id="dbCustomMenu5" label="资料管理">
          	       <button id="RunMyMacro5" label="商品信息查询" onAction="系统菜单_资料管理.商品资料信息"/>
			       <button id="RunMyMacro6" label="供应信息查询" onAction="系统菜单_资料管理.供应商资料管理"/>
			       <button id="RunMyMacro7" label="客户信息查询" onAction="系统菜单_资料管理.客户资料管理"/>
		         </menu>
                 <menu id="dbCustomMenu6" label="退出系统">
                    <button id="RunMyMacro8" label="保存&退出" onAction="系统菜单_退出系统"/>
                    <button id="RunMyMacro9" label="退出&不存" onAction="系统菜单_仅退不存"/>
                </menu>
              </box>
</group>
        </tab>
    </tabs>
  </ribbon>
</customUI>

测试十五： 在一个组内使用box元素，使用box元素的水平排列功能。将“十四”中“horizontal”前后多余的空格删除，将退出菜单按钮标签里的“&”删除。运行结果OK.

<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui">
  <ribbon startFromScratch="false">
    <tabs>
      <tab id="dbCustomTab" label="加载项" visible="true">
            <group id="myGroup1" label="自定义功能栏">
               <box id= "myBox1"  boxStyle="horizontal"  visible="true">
                 <menu id="dbCustomMenu1" label="进货管理">
                    <button id="RunMyMacro1" label="进货单" onAction="系统菜单_进货管理"/>
                </menu>
                <menu id="dbCustomMenu2" label="销售管理">
<button id="RunMyMacro2" label="销售单" onAction="系统菜单_销售管理"/>
                </menu>
                <menu id="dbCustomMenu3" label="库存管理">
                   <button id="RunMyMacro3" label="库存查询" onAction="系统菜单_库存管理"/>
                </menu>
                <menu id="dbCustomMenu4" label="系统管理">
                   <button id="RunMyMacro4" label="权限设置" onAction="系统菜单_系统管理"/>
                </menu>
                <menu id="dbCustomMenu5" label="资料管理">
          	       <button id="RunMyMacro5" label="商品信息查询" onAction="系统菜单_资料管理.商品资料信息"/>
			       <button id="RunMyMacro6" label="供应信息查询" onAction="系统菜单_资料管理.供应商资料管理"/>
			       <button id="RunMyMacro7" label="客户信息查询" onAction="系统菜单_资料管理.客户资料管理"/>
		         </menu>
                 <menu id="dbCustomMenu6" label="退出系统">
                    <button id="RunMyMacro8" label="保存退出" onAction="系统菜单_退出系统"/>
                    <button id="RunMyMacro9" label="退出不存" onAction="系统菜单_仅退不存"/>
                </menu>
              </box>
</group>
        </tab>
    </tabs>
  </ribbon>
</customUI>