VB用DDE开发AutoCAD for Windows_VB.NET程序_学习笔记★闵涛★计算机学习电脑编程软硬件技巧


	转至繁体中文版	\| 网站首页 \| 图文教程 \| 资源下载 \| 站长博客 \| 图片素材 \| 武汉seo \| 武汉网站优化 \|

VB用DDE开发AutoCAD for Windows

作者：闵涛文章来源：闵涛的学习笔记点击数：827 更新时间：2009/4/23 14:59:02

　　目前，许多工程CAD系统是以AutoCAD作为支撑软件，在其基础上进行二次开发而形成的。AutoCAD R12 for Windows 以AutoLISP和ADS作为二次开发工具，但它们都有不足之处，AutoLISP速度慢，没有友好的开发环境，ADS是基于C语言的开发环境，而C语言面向Windows编程本身难以掌握，因此AutoLISP和ADS的使用都受到一定的限制。VB是Windows下主要的开发工具之一，它的“可视性”和“事件驱动性”简化了面向Windows的编程，深受广大用户的青睐。Windows下，VB和AutoCAD都支持强有力的DDE(动态数据交换)功能，用VB编写具有DDE功能的程序来控制AutoCAD，既能与AutoCAD交换各种复杂的数据结构，又能向AutoCAD发送命令，由此开发出的应用程序能满足用户的需要，同时又缩短了开发周期。本文结合实例介绍了用VB开发AutoCAD的途径与方法。

　　一、直接利用DDE功能开发

　　DDE是Windows的强大功能之一，它可以使应用程序自动地接收由其它应用程序发送来的数据，当传送端的数据有变化时，接收端的数据也会随之改变，也可将命令或键盘输入传递给其它程序，实现远程控制。

　　在VB编程环境中，创建应用程序的方法很简单，首先是设计用户界面，也就是在空白窗体中放入所需要的控件，如命令按钮，单选钮，文本框，标签，图片框等，然后针对各控件上要发生的事件(如鼠标单击，鼠标移动等)书写事件过程，最后将编写的应用程序运行，调试，生成执行文件即可。VB中能和其它Window应用程序建立DDE通道的控件有文本框，标签和图片框。下面结合简单实例，说明VB应用程序与AutoCAD间建立DDE通道和交换数据的方法。

　　在VB中启动一个新项目，参见图(1)建立窗体，其中“建立链接”，“直线”，“标注”，“退出”为命令按钮，标有“Text1”的为文本框，用于建立DDE通道，并输入下面的事件代码。

Option Explicit

　Private Sub cmdLine_Click() '画直线

　　Text1.LinkExecute " [^3^3line 3,3 8,8 ^3]"

　End Sub

　Private Sub cmdText_Click() '标注文字

　　Text1.LinkExecute " [^3^3text 10,10 1 90 AUTOCAD!^10]"

　End Sub

　Private Sub cmdLink_click() '建立链接

　　Text1.LinkMode = 0

　　Text1.LinkTopic = "autocad.dde|system"

　　Text1.LinkMode = 2

　End Sub

　Private Sub cmdExit_click() '退出

　　End

　End Sub
　
　　运行此应用程序，注意在运行前，一定要先加载AutoCAD。单击“建立链接”按扭，cmdLink_Click()过程被执行，执行时设置文本框Text1的LinkTopic和LinkMode的属性，完成VB应用程序与AutoCAD间DDE通道的建立。LinkTopic属性用于通知AutoCAD由谁来提供数据，它被管道符“|”分成两部分，第一部分“AutoCAD.DDE”为应用程序名，第二部分“System”是通讯的主题。LinkMode属性用于切实建立链接，在LinkMode=0时，表示关闭以前的DDE通道，在LinkMode=2时，表示以手动模式激活DDE通道。

　　在完成DDE链接后，VB应用程序就可以与AutoCAD间进行数据交换或命令传送了。单击“直线”按扭，cmdLine_Click()过程被执行，应用程序通过LinkExecute方法向AutoCAD发送命令，在AutoCAD中以点(3,3)和(8,8)为端心，画一条直线。语句中的^3相当于AutoCAD中的取消键Ctrl+C，空格相当于AutoCAD中的回车键。单击“标注”按扭，执行cmdText_Click()过程，可在AutoCAD中显示以(10,10)为基点，高为1，旋转角度为90的字符串“AutoCAD!”。语句中的^10相当于AutoCAD中的回车键，在标注文字时不能用空格代替回车键。

　　根据需要，可用上面的方法传送AutoCAD的其它命令，实现对AutoCAD的开发。

[系统软件]InstallShield Express for delphi制作安装程序定…  [系统软件](转帖) 忘记登录密码的解决方案 for XP/2003/2000
[系统软件]交叉编译sshd for IXP425 ARM  Platform by MVL 3…  [Delphi程序]《关于VisiBroker For Delphi的使用》(4)
[Delphi程序]一个超链接Image控件！（For D3,D4,D5,D6)源代码  [Delphi程序]Five of the best tools for Delphi
[Delphi程序]《关于VisiBroker For Delphi的使用》(3)  [Delphi程序]《关于VisiBroker For Delphi的使用》(2)
[Delphi程序]《关于VisiBroker For Delphi的使用》  [Delphi程序]Delphi for .Net 编译器预览 - by John Kaster

教程录入：mintao 责任编辑：mintao

上一篇教程：在VB中用PictureClip控件实现动画

下一篇教程：应用Automation技术进行AutoCad的开发

【字体：小大】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】

注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网]

　网友评论：（只显示最新10条。评论内容只代表网友观点，与本站立场无关！）

同类栏目

· C语言系列 · VB.NET程序
· JAVA开发 · Delphi程序
· 脚本语言

热门推荐

没有教程

赞助链接

闵涛博文

500 - 内部服务器错误。

您查找的资源存在问题，因而无法显示。

鄂公网安备 42011102001154号

站长：MinTao ICP备案号：鄂ICP备11006601号-18

闵涛站盟:医药大全-武穴网。A打造B、C、D……