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