vb.netcad接口 cad软件vba窗口如何调用

vb怎样与AUTO CAD连接的!

VB可以与CAD连接,但要先转化为文本文档,在编写一个接口程序。

十余年的莲湖网站建设经验,针对设计、前端、开发、售后、文案、推广等六对一服务,响应快,48小时及时工作处理。营销型网站建设的优势是能够根据用户设备显示端的尺寸不同,自动调整莲湖建站的显示方式,使网站能够适用不同显示终端,在浏览器中调整网站的宽度,无论在任何一种浏览器上浏览网站,都能展现优雅布局与设计,从而大程度地提升浏览体验。创新互联从事“莲湖网站设计”,“莲湖网站推广”以来,每个客户项目都认真落实执行。

不过,实际上一般不会这样做,因为在CAD当中可以直接加载VB,就是我们通常说的VBA,一般用作CAD的二次开发来用,比如说自动绘图。语法和VB差不多,只是一些细小的差别,很简单的。

打开CAD,点击“工具”/“宏”/VB管理器,再在里面写程序,运行时,要先加载VB,再点击“宏”里面的“加载工程”,再把你的程序加载进去就可以运行了。如果你的程序不能运行,说明你是用VB编写的,不是用VBA编写的,虽然语法相同,但也运行不了,你自己试试吧!其实只要你会VB,VBA就很简单,只是一般用来画图要计算坐标,很麻烦!

VB.NET连接AutoCAD出错

这个是vb.net教材里面的吧,我也是前两天刚下的。遇到类似的问题,下面是我的解决办法

首先要参考引用Autodesk.AutoCAD.Interop.dll还有Autodesk.AutoCAD.Interop.Common.dll

然后代码有两处也需要相应修改,我用的是.NET 的 vb2008

'Dim AcadApp As AutoCAD.AcadApplication

Dim AcadApp As Autodesk.AutoCAD.Interop.AcadApplication

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Call 连接AutoCAD()

End Sub

Sub 连接AutoCAD()

On Error Resume Next

AcadApp = GetObject(, "AutoCAD.Application")

If Err.Number Then

Err.Clear()

AcadApp = CreateObject("AutoCAD.Application")

If Err.Number Then

MsgBox("不能运行AutoCAD,请检查是否安装了AutoCAD")

Exit Sub

End If

End If

AcadApp.Visible = True '界面可视

'AcadApp.WindowState = AutoCAD.AcWindowState.acMax '界面最大化

AcadApp.WindowState = Autodesk.AutoCAD.Interop.Common.AcWindowState.acMax

AppActivate(AcadApp.Caption) '显示AutoCAD界面

End Sub

vb程序与cad的接口

CAD内部自己有vBa和LISP两种语言,如果你需要这方面的知识 请到以下地址去 保证值:

'明经通道


分享名称:vb.netcad接口 cad软件vba窗口如何调用
当前路径:http://bzwzjz.com/article/dophioh.html

其他资讯

Copyright © 2007-2020 广东宝晨空调科技有限公司 All Rights Reserved 粤ICP备2022107769号
友情链接: 成都网站制作 成都网站建设公司 重庆网站建设 成都网站建设 成都网站建设 响应式网站设计 攀枝花网站设计 网站制作 成都网站建设 企业网站设计 成都品牌网站设计 品牌网站建设 重庆网站制作 四川成都网站设计 成都网站建设 网站建设推广 成都网站建设 企业网站设计 手机网站制作 做网站设计 成都响应式网站建设 高端网站设计