WPS自动化的实现:[5]Document事件1
1、打开WPS,依次打开视图—开发工具—VB编辑器,弹出如下界面
![WPS自动化的实现:[5]Document事件1](https://exp-picture.cdn.bcebos.com/a749bb0f94fc508c29cfa04c01775ddd884cfd55.jpg)
2、如图在Project1项中展开ThisDocument,并添加如下代码Private Sub Document_Open()MsgBox 媪青怍牙"欢迎"End SubPrivate Sub Document_Close()MsgBox "感谢您的使用"End Sub
![WPS自动化的实现:[5]Document事件1](https://exp-picture.cdn.bcebos.com/5c9c964ce54a2f275eee4fb2e00192dd3340f455.jpg)
3、点击运行,之后点击文件—保存,关闭WSP文档。当我们重新打开时,就出现了欢迎对话框;当点击关闭时会弹出感谢对话框
![WPS自动化的实现:[5]Document事件1](https://exp-picture.cdn.bcebos.com/b7b28f87031c99c06dfd8632af2fa872941fed55.jpg)
![WPS自动化的实现:[5]Document事件1](https://exp-picture.cdn.bcebos.com/955ea0e434daf05e80221ec5751d96d81819e555.jpg)
4、补充:有时候我们找不到工程资源管理器,只要打开视图—工程资源管理器就可以了
![WPS自动化的实现:[5]Document事件1](https://exp-picture.cdn.bcebos.com/19587f20a7cd0c6e29f36507fed7997bbbf4dd55.jpg)