显示消息工作簿OnClose事件
这个例子展示了如何处理一个COM接口事件,如何设置一个事件在一个微软®Excel®工作簿对象,如何处理它BeforeClose事件。
事件处理程序创建以下文件,OnBeforeCloseWorkbook.m,在当前文件夹。
函数OnBeforeCloseWorkbook(变长度输入宗量)disp (“BeforeClose事件发生”)
创建Excel对象并使其可见。
xl = actxserver (“Excel.Application”);xl。可见= 1;
添加一个工作簿。
hWbks = xl.Workbooks;hWorkbook = hWbks.Add;
注册OnBeforeCloseWorkbook函数OnClose事件。
registerevent (hWorkbook, {“BeforeClose”@OnBeforeCloseWorkbook})
关闭工作簿,这触发了关闭事件和调用OnClose处理程序。
关上(hWorkbook)
BeforeClose事件发生
辞职(xl)
