Access开发培训
网站公告
·Access专家课堂QQ群号:151711184    ·Access快速开发平台下载地址及教程    ·欢迎加入Access专家课堂微信群!    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > Access2007

access2007中自定义 Ribbon (二)—— 编写回调函数

时 间:2007-11-21 08:57:11
作 者:朱亦文   ID:61  城市:岳阳
摘 要:Access 12 中自定义 Ribbon (二)—— 编写回调函数
正 文:

Access 12 中自定义 Ribbon (二)—— 编写回调函数

作者:朱亦文
日期:2006年8月25日

回调函数的目的是完成 Ribbon 上控件所执行的功能。在上一篇文章中的 XML 内容中,第一行:

<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" onLoad="onLoadRibbon">

onLoad 属性值为 onLoadRibbon,即表示在加载 Ribbon 时调用 onLoadRibbon 函数,这个函数要用 VBA 来进行书写。

一、建立 Access 应用程序
新建一个数据库,命名为 Ribbon.accdb,导入 Northwind2007.accdb 数据库中所有对象(示例中要用一些对象)。按 Alt+F11 键进入 VBE。为了使用 Ribbon 对象,首先必须引用 Microsoft Office 12.0 Object Library

二、建立模块

为了统一管理,将所有回调函数放在同一个模块中,在 VBE 中新建一个模块,命名为 basRibbonCallbacks。为了以后能方便地使用自定义的 Ribbon 对象,定义一个全局对象变量 gobjRibbon,并 onLoad 指定的回调函数 onLoadRibbon 中进行赋值。

 1Option Compare Database
 2Option Explicit
 3
 4' ------------------------------
 5' 本模块包含 Ribbon 回调子程序
 6' ------------------------------


Access软件网QQ交流群 (群号:54525238)       Access源码网店

常见问答:

技术分类:

相关资源:

专栏作家

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助