田草博客

互联网田草博客


网友交流QQ群:11740834 需注明申请加入原因

微信 公众号:ByCAD

邮箱:tiancao1001x126.com
ByCAD,微信公众号
首页 | 普通 | 电脑 | AutoCAD | VB/VB.NET | FLash | 结构 | 建筑 | 电影 | BIM | 规范 | 软件 | ID
-随机-|-分布-
-博客论坛-|-﨣﨤﨧﨨-
-网站导航-|-规范下载-
-BelovedFLash欣赏-

用户登陆
用户:
密码:
 

站点日历
73 2024 - 11 48
     12
3456789
10111213141516
17181920212223
24252627282930


站点统计

最新评论



柱下钢筋混凝土独立基础最小配筋率讨论 允许使用HTML代码发贴的论坛--转帖
未知 AutoCAD VBA 二次开发教程源码   [ 日期:2008-03-10 ]   [ 来自:本站原创 ]  HTML
AutoCAD VBA 二次开发教程源码


按此在新窗口打开图片




百度云链接:点击下载

百度云密码:kzci



文件夹 PATH 列表
卷序列号码为 00008047 08EF:17BE
D:.
│  1.txt
│  
└─AutoCAD VBA 二次开发教程源码
    ├─chap01 ActiveX Automation基础
    │      宏.dvb
    │      集合对象的使用.dvb
    │      
    ├─chap02 控制AutoCAD环境
    │      命名视图.dvb
    │      和用户交互.dvb
    │      文档操作.dvb
    │      缩放视图.dvb
    │      
    ├─chap03 创建和编辑二维图形对象
    │      使用SendCommand方法.dvb
    │      利用制图法通过三点创建圆.dvb
    │      圆管的放样展开.dvb
    │      在AutoCAD 2004以前版本中计算优化多段线长度.dvb
    │      多段线的几个问题.dvb
    │      天圆地方的放样展开.dvb
    │      样条曲线转化为多段线.dvb
    │      根据起点、终点和弧长创建圆弧.dvb
    │      点到多段线的最短距离.dvb
    │      直线、圆和圆弧修改为多段线.dvb
    │      选择集.dvb
    │      
    ├─chap04 对象特性
    │      ObjectDBX测试图形.dwg
    │      使用ObjectDBX技术导入其他图形中的信息.dvb
    │      按图层进行缩放.dvb
    │      
    ├─chap05 文字的创建和编辑
    │  │  使用ObjectDBX实现批量文字替换.dvb
    │  │  提取多行文字中的文字内容.dvb
    │  │  文字按插入点自动对齐.dvb
    │  │  
    │  └─创建文字样式
    │      │  创建文字样式.dvb
    │      │  
    │      └─SystemFonts
    │              Fonts.cls
    │              MSSCCPRJ.SCC
    │              SystemFonts.dll
    │              SystemFonts.exp
    │              SystemFonts.lib
    │              SystemFonts.vbp
    │              SystemFonts.vbw
    │              
    ├─chap06 标注和公差
    │  │  列举所有的形位公差符号.dvb
    │  │  标注圆弧长度.dvb
    │  │  
    │  └─锁定标注文字不随对象缩放而动态改变
    │          FixDimByCopyDim.dvb
    │          FixdimBySubEntity.dvb
    │          
    ├─chap07 块和属性
    │  │  AutoCAD中斜切功能的实现.dvb
    │  │  使用匿名块.dvb
    │  │  将已经存在的实体添加到块定义中.dvb
    │  │  属性块的使用.dvb
    │  │  简单块的定义和插入.dvb
    │  │  自动标题栏.dvb
    │  │  
    │  └─块属性生成表格
    │          Att2TableSample.dwg
    │          块属性生成表格.dvb
    │          
    ├─chap08 使用AutoCAD中的事件
    │  │  处理对象层事件.dvb
    │  │  处理应用程序层事件.dvb
    │  │  处理文档层事件.dvb
    │  │  
    │  └─永久反应器
    │      │  测试代码.txt
    │      │  
    │      └─TlsCad
    │              CDocument.cls
    │              CEntity.cls
    │              MSSCCPRJ.SCC
    │              TlsApplication.cls
    │              TlsCad.dll
    │              TlsCad.exp
    │              TlsCad.lib
    │              TlsCad.rar
    │              TlsCad.vbp
    │              TlsCad.vbw
    │              TlsReactor.cls
    │              TlsReactors.cls
    │              TlsSelectionSet.cls
    │              TlsUtility.cls
    │              
    ├─chap09 在三维空间工作
    │  │  偏心圆台.dvb
    │  │  创建UCS.dvb
    │  │  在UCS中创建基本图元.dvb
    │  │  在三维空间中创建填充.dvb
    │  │  正多面体.dvb
    │  │  
    │  └─窗体图片
    │          偏心圆台.wmf
    │          偏心圆台窗体.dwg
    │          正二十面体.wmf
    │          正八面体.wmf
    │          正六面体.wmf
    │          正十二面体.wmf
    │          正四面体.wmf
    │          
    ├─chap10 布局和打印
    │      批量打印.dvb
    │      
    ├─chap11 高级绘图与组织技术
    │      使用SummaryInfo对象保存图形信息.dvb
    │      扩展字典.dvb
    │      扩展数据.dvb
    │      示例图形.dwg
    │      绘图顺序.dvb
    │      
    ├─chap12 VBA与应用程序
    │  │  VBA应用程序的错误处理.dvb
    │  │  调试VBA应用程序.dvb
    │  │  
    │  ├─创建和使用定时器
    │  │  │  创建和使用定时器.dvb
    │  │  │  
    │  │  └─VBA_Timer
    │  │          MSSCCPRJ.SCC
    │  │          Timer.cls
    │  │          VBA_Timer.dll
    │  │          VBA_Timer.exp
    │  │          VBA_Timer.lib
    │  │          VBA_Timer.vbp
    │  │          VBA_Timer.vbw
    │  │          
    │  ├─显示停靠窗口—Accont组件
    │  │  │  accont.zip
    │  │  │  accont16.zip
    │  │  │  CH3_4.dwg
    │  │  │  CH3_4.exp
    │  │  │  CH3_4.lib
    │  │  │  CH3_4.ocx
    │  │  │  CH3_4.vbp
    │  │  │  CH3_4.vbw
    │  │  │  MSSCCPRJ.SCC
    │  │  │  PICKSET.BMP
    │  │  │  UserControl1.ctl
    │  │  │  UserControl1.ctx
    │  │  │  
    │  │  ├─accont
    │  │  │      accont.arx
    │  │  │      accont.hlp
    │  │  │      accont.tlb
    │  │  │      accont_help.doc
    │  │  │      docktest.zip
    │  │  │      source.zip
    │  │  │      
    │  │  ├─accont16
    │  │  │      accont16.arx
    │  │  │      accont16.tlb
    │  │  │      
    │  │  └─停靠窗口
    │  │          停靠窗口.vbp
    │  │          停靠窗口.vbw
    │  │          
    │  ├─显示幻灯片—Slide组件
    │  │  │  slide.zip
    │  │  │  显示幻灯片—Slide组件.dvb
    │  │  │  
    │  │  └─slide
    │  │          install.bat
    │  │          Slide.ocx
    │  │          Slm.cnt
    │  │          SLM.HLP
    │  │          
    │  ├─显示缩略图—DwgThumbnail组件
    │  │  │  DwgThumbnail组件.zip
    │  │  │  显示缩略图—DwgThumbnail组件.dvb
    │  │  │  
    │  │  └─DwgThumbnail组件
    │  │          DWGTHUMBNAIL.HLP
    │  │          DwgThumbnail.ocx
    │  │          ReadMe.txt
    │  │          
    │  └─解析表达式—MSScript组件
    │          msscript.ocx
    │          解析表达式—MSScript组件.dvb
    │          
    ├─chap13 与其他应用程序和Windows API交互
    │  │  去掉关闭按钮(X)和添加右键菜单.dvb
    │  │  转换AutoCAD数据到Word和Excel中.dvb
    │  │  转换Excel数据到AutoCAD中.dvb
    │  │  
    │  ├─使用Excel数据绘图
    │  │      demo.xls
    │  │      使用Excel数据绘图.dvb
    │  │      
    │  ├─转换AutoCAD数据到Word和Excel中-测试资料
    │  │      demo.doc
    │  │      demo.dwg
    │  │      xh.dwg
    │  │      xhh.dwg
    │  │      
    │  └─转换Excel数据到AutoCAD中-测试资料
    │          demo.xls
    │          
    ├─chap14 创建数据库应用程序
    │  │  使用ADODC控件.dvb
    │  │  使用记录集从数据表中读取数据.dvb
    │  │  创建数据库的ADO连接.dvb
    │  │  创建数据表.dvb
    │  │  
    │  └─数据记录和AutoCAD实体的对应
    │          Attribute.mdb
    │          Demo.bak
    │          Demo.dwg
    │          数据记录和AutoCAD实体的对应.dvb
    │          
    ├─chap15 VBA程序的发布
    │  │  更改AutoCAD应用程序的图标和标题栏.dvb
    │  │  
    │  ├─在命令行或菜单中执行VBA程序
    │  │      Draw2Line.bmp
    │  │      Draw3Line.bmp
    │  │      DrawLine.dvb
    │  │      DrawLine.mnc
    │  │      DrawLine.mnr
    │  │      DrawLine.mns
    │  │      DrawLine.mnu
    │  │      DrawLine1.lsp
    │  │      DrawLine2.lsp
    │  │      DrawLine3.lsp
    │  │      DrawLine4.lsp
    │  │      DrawLine5.lsp
    │  │      
    │  ├─在工具栏中使用自定义图标
    │  │  │  mjtd.dll
    │  │  │  mjtd.mnc
    │  │  │  mjtd.mnr
    │  │  │  mjtd.mns
    │  │  │  mjtd.mnu
    │  │  │  
    │  │  ├─ResourceDLL
    │  │  │      Class1.cls
    │  │  │      mjtd.exp
    │  │  │      mjtd.lib
    │  │  │      mjtd.RES
    │  │  │      mjtd.vbp
    │  │  │      mjtd.vbw
    │  │  │      MSSCCPRJ.SCC
    │  │  │      
    │  │  └─按钮图标
    │  │          acadbtn_dll_ICON_16_LINE.bmp
    │  │          acadbtn_dll_ICON_16_ZOO2X.bmp
    │  │          acadbtn_dll_ICON_16_ZOO5X.bmp
    │  │          
    │  ├─基本图库的实现
    │  │  │  BlockLib.mnu
    │  │  │  基本图库的实现.dvb
    │  │  │  
    │  │  ├─Blocks
    │  │  │      circle.bak
    │  │  │      circle.dwg
    │  │  │      donut.bak
    │  │  │      donut.dwg
    │  │  │      point.bak
    │  │  │      point.dwg
    │  │  │      rectangle.bak
    │  │  │      rectangle.dwg
    │  │  │      test.bak
    │  │  │      test.dwg
    │  │  │      桌椅.bak
    │  │  │      桌椅.dwg
    │  │  │      
    │  │  └─Slides
    │  │          circle.sld
    │  │          donut.sld
    │  │          point.sld
    │  │          rectangle.sld
    │  │          test.sld
    │  │          桌椅.sld
    │  │          
    │  ├─实现VBA程序的先选择后操作和透明命令
    │  │      AutoVBA.lsp
    │  │      ChangeColor.dvb
    │  │      VbaRun.lsp
    │  │      Zoom.dvb
    │  │      Zoom.lsp
    │  │      
    │  ├─程序的打包和发布
    │  │  │  acaddoc.lsp
    │  │  │  infolist.txt
    │  │  │  license.txt
    │  │  │  mjtd.ico
    │  │  │  mjtd.mnu
    │  │  │  setup.bmp
    │  │  │  
    │  │  ├─Templates
    │  │  │      样板.dwt
    │  │  │      
    │  │  └─VBA Macros
    │  │          acad.dvb
    │  │          使用ObjectDBX实现批量文字替换.dvb
    │  │          使用ObjectDBX技术导入其他图形中的信息.dvb
    │  │          偏心圆台.dvb
    │  │          圆管的放样展开.dvb
    │  │          在三维空间中创建填充.dvb
    │  │          按图层进行缩放.dvb
    │  │          文字按插入点自动对齐.dvb
    │  │          样条曲线转化为多段线.dvb
    │  │          根据起点、终点和弧长创建圆弧.dvb
    │  │          正多面体.dvb
    │  │          点到多段线的最短距离.dvb
    │  │          直线、圆和圆弧修改为多段线.dvb
    │  │          
    │  └─菜单宏
    │          Line.dvb
    │          MenuMacro.mnc
    │          MenuMacro.mnr
    │          MenuMacro.mns
    │          MenuMacro.mnu
    │          
    ├─chap16 VBA开发相关技术
    │  │  搜索某个文件夹中所有的文件.dvb
    │  │  获得所有加载的VBA工程的路径和名称.dvb
    │  │  
    │  ├─在VB中创建应用程序
    │  │      frmMain.frm
    │  │      Module1.bas
    │  │      MSSCCPRJ.SCC
    │  │      TextReplace.vbp
    │  │      TextReplace.vbw
    │  │      
    │  └─显示窗体的VB DLL工程
    │          CTest.cls
    │          frmTest.frm
    │          MSSCCPRJ.SCC
    │          prjTest.dll
    │          prjTest.exp
    │          prjTest.lib
    │          prjTest.vbp
    │          prjTest.vbw
    │          
    └─附赠的应用程序源码
            使用DBX复制对象.dvb
            创建与直线平行的文字.dvb
            创建分数.dvb
            判断对象所在的工作空间.dvb
            判断点是否在直线的右侧.dvb
            块内按点生成填充.dvb
            将文字转换为属性.dvb
            打印到文件夹.dvb
            打开和关闭屏幕菜单.dvb
            查询动态块的自定义特性.dvb
            清理组.dvb
            自动注册控件.dvb
            获得填充边界.dvb
            


[本日志由 tiancao1001 于 2018-08-31 10:37 PM 编辑]


[1] [2] [3] [4] [5] 
引用这个评论 dianli2007 于 2016-10-19 12:59 AM 发表评论: 
麻烦田老师发我一下吧,719182192@qq.com

引用这个评论 fanyanwei99 于 2016-10-13 06:54 PM 发表评论: 
请发一份AutoCAD VBA 二次开发教程源码到邮箱407481347@qq.com  谢谢

引用这个评论 糖雪 于 2016-09-02 07:14 PM 发表评论: 
有劳田老师给法一份,谢谢啦 505816564@qq.com

引用这个评论 iliyakana 于 2016-06-22 03:59 PM 发表评论: 
有劳田老师给法一份,不胜感激409166610@qq.com

引用这个评论 qq84603709 于 2016-05-09 07:08 PM 发表评论: 
有劳田老师给法一份,不胜感激84603709@qq.com

引用这个评论 centermj 于 2016-05-08 02:24 PM 发表评论: 
有劳田老师给法一份,不胜感激meng.jin@foxmail.com

引用这个评论 AWYiji 于 2016-04-22 09:29 PM 发表评论: 
田老师 发一份给我吧,我是做工程翻样的,需要 AutoCAD VBA 二次开发教程源码,我的邮箱:1439515948@qq.com 谢谢!

引用这个评论 AWYiji 于 2016-04-22 09:26 PM 发表评论: 
田老师 发一份给我吧,我是做工程翻样的,需要 AutoCAD VBA 二次开发教程源码,谢谢!

引用这个评论 TomorrowGary 于 2016-04-11 09:30 PM 发表评论: 
772860715@qq.com
在校学生,正在学习VBA开发进行毕设,遇到了很多问题。
希望田老师发一份给我,非常感谢。

引用这个评论 青青河边草687 于 2016-04-11 11:08 AM 发表评论: 
田老师,请求您赐我一份吧,万分感谢!!!(2493386323@qq.com)

引用这个评论 haokunxiao 于 2016-04-04 10:22 AM 发表评论: 
请发给我一份。邮箱:haokunxiao@tom.com 谢谢!

引用这个评论 haokunxiao 于 2016-04-04 10:05 AM 发表评论: 
谢谢。发与我一份。

引用这个评论 yuyuanjiang1 于 2016-02-29 08:59 AM 发表评论: 
394693047@qq.com请发给我一份,谢谢!

引用这个评论 赵雪源 于 2016-01-29 01:52 PM 发表评论: 
1575697786@qq.com 请发我一份。非常 感谢

引用这个评论 cq小y 于 2016-01-07 10:01 AM 发表评论: 
无法下载,94388062@qq.com,谢谢,麻烦发我一份

引用这个评论 guojianrui 于 2015-12-26 06:58 PM 发表评论: 
田大侠,
麻烦您给我发一份。
guojianrui@126.com. 
本人初学者,如蒙赐教,不胜感激。
郭建锐

引用这个评论 onesun2010715 于 2015-12-23 11:42 AM 发表评论: 
下不到,邮箱:onesun2001@163.com

引用这个评论 luojie 于 2015-10-29 09:21 AM 发表评论: 
luojiecy@163.com  麻烦您发份学习资料及源码 谢谢!

引用这个评论 tiancao1001 于 2015-09-27 10:30 PM 发表评论: 
shenme32233  zhenqimiao

引用这个评论 tiancao1001 于 2015-09-24 01:11 PM 发表评论: 
kaisdh3233 copyright2009 神魔三国

[1] [2] [3] [4] [5] 
发表评论 - 不要忘了输入验证码哦!
作者: 用户:  密码:   注册? 验证:  防止恶意留言请输入问题答案:2*6=?  
评论:

禁止表情
禁止UBB
禁止图片
识别链接
识别关键字

字体样式 文字大小 文字颜色
插入粗体文本 插入斜体文本 插入下划线
左对齐 居中对齐 右对齐
插入超级链接 插入邮件地址 插入图像
插入 Flash 插入代码 插入引用
插入列表 插入音频文件 插入视频文件
插入缩进符合
点击下载按钮 下标 上标
水平线 简介分割标记
表  情
 
Tiancao Blog All Rights Reserved 田草博客 版权所有
Copyright ©