乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 ☆ ☆ ☆ 尊重版权，从我做起，拒绝盗版，拒绝倒卖 ☆ ☆ ☆ 签到、发布资源、邀请好友注册，可以获得银币 ☆ ☆ ☆ 请注意保管好自己的密码，避免账户资金被盗
查看： 50|回复： 2

求助：当关闭CAD时应该触发什么事件啊？（VBA）

[复制链接]
bsynuaa

20

主题

42

帖子

2

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
122
发表于 2003-12-9 21:54:00 | 显示全部楼层 |阅读模式
回复

使用道具 举报

efan2000

26

主题

589

帖子

10

银币

中流砥柱

Rank: 25

铜币
693
发表于 2003-12-9 22:02:00 | 显示全部楼层 
  1. 

  2. ‘ 在类模块或者窗体中

  3. ' 声明一个带事件的应用程序变量

  4. Private WithEvents AcadApp As AcadApplication

  5. ' AutoCAD开始退出事件

  6. Private Sub AcadApp_BeginQuit(Cancel As Boolean)

  7.     ' 取消退出

  8.     Cancel = True

  9. End Sub

  10. Sub test()

  11.     ' 赋值，注意Application事情必须自己激发

  12.     Set AcadApp = ThisDrawing.Application

  13. End Sub
回复

使用道具 举报

XJ_HE

21

主题

105

帖子

7

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
189
发表于 2003-12-10 15:52:00 | 显示全部楼层
哇噻。 请教EFAN版主。你这些东东能不能总结一下。（CAD的事件）
然后给我们菜鸟列出来。
回复

使用道具 举报

返回列表 发帖

发表回复

高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

精选推荐

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-6-29 17:10 , Processed in 1.365260 second(s), 60 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表