QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

楼主: woaishuijia
收起左侧

[原创] autocad二次开发(VBA)就这么简单

[复制链接]
发表于 2013-2-2 14:20:14 | 显示全部楼层 来自: 中国广西梧州
woaishuijia 发表于 2007-1-9 10:11 static/image/common/back.gif
" @; v3 |9 Z( ?既然有网友对这个话题感兴趣,就再画个圆玩玩。2 ?# [  h- D- u. m  d; Z+ k$ f
, T8 k) o' ^9 v" k" _
Sub 画个圆玩玩()

, |3 [4 F* N) M& I( j+ S楼主是怎么知道这些的啊?是通过什么方式学习的啊?
发表于 2013-2-3 12:04:20 | 显示全部楼层 来自: 中国广西梧州
zhuxingyin 发表于 2008-12-1 10:27 static/image/common/back.gif2 c6 D; o, P3 D7 Y! q8 E
原来CAD有这么强的呀,不知道2004版的支持VBA否?

9 k0 W/ t5 v7 d6 `! x- GCAD2004支持VBA的
发表于 2013-2-21 23:15:14 | 显示全部楼层 来自: 中国广东东莞
看起来很简单,明天也学一学
发表于 2013-5-1 21:13:44 | 显示全部楼层 来自: 中国广西梧州
woaishuijia 发表于 2012-12-21 14:34 static/image/common/back.gif) E' m+ ]. m3 ?  O) |0 U
当然可以

, L; t- g; v* x7 d9 m您好!请问没有命令的VLX程序怎样在CAD里运行?怎样用一个LSP文件来引导运行没有命令的VLX程序?
 楼主| 发表于 2013-5-3 07:50:24 | 显示全部楼层 来自: 中国辽宁营口
fcm 发表于 2013-5-1 21:13 static/image/common/back.gif0 A( \6 J! n7 W; ^3 C3 G
您好!请问没有命令的VLX程序怎样在CAD里运行?怎样用一个LSP文件来引导运行没有命令的VLX程序?
& A  r( f: X: h0 Q
不知道VLX的函数名就没法用
发表于 2013-5-5 18:33:07 | 显示全部楼层 来自: 中国广西梧州
woaishuijia 发表于 2013-5-3 07:50 static/image/common/back.gif) L0 K% b, j, N6 I, o
不知道VLX的函数名就没法用
5 E/ P9 s2 Q1 f' X; y' l
谢谢你的回答!
发表于 2013-5-11 19:47:48 | 显示全部楼层 来自: 中国山西太原
非常不做,在.NET中也一样应用把
发表于 2013-6-11 16:39:51 | 显示全部楼层 来自: 中国北京
楼主太强大了,深受震撼!
发表于 2013-8-14 16:42:17 | 显示全部楼层 来自: 中国广东深圳
试验成功,中间少输了括号一直出现错误5,继续学习!谢谢前辈分享!!!
发表于 2013-9-1 16:31:54 | 显示全部楼层 来自: 中国上海
很想学这个语言,以前学过C与java语言,感觉没有什么前途,今天看到这个又燃起心中的学习欲望了
发表于 2013-9-23 19:57:52 | 显示全部楼层 来自: 中国广东肇庆
看到代码就头大,更不要说从那下手了
发表于 2013-10-8 22:48:27 | 显示全部楼层 来自: 中国台湾
一直以來都用AUTOLISP寫功能,希望可以跨入VISUAL的領域
发表于 2013-10-18 12:53:43 | 显示全部楼层 来自: 中国上海
照楼主那样写运行不了是怎么回事
5 }$ y9 X  |3 R4 \0 b3 C
发表于 2013-10-28 11:05:20 | 显示全部楼层 来自: 中国湖北宜昌
楼主 请问如何将CAD中三维图形的体积输出到数据库中啊
发表于 2013-12-7 17:47:02 | 显示全部楼层 来自: 中国山东济宁
谢楼主共享
发表于 2014-1-12 17:46:07 | 显示全部楼层 来自: 中国浙江嘉兴
楼上的天龙八部能否详述,谢谢
发表于 2018-4-25 00:52:03 | 显示全部楼层 来自: 中国江苏南京
向楼主学习了,真是会者不难,难者不会,前一段时间我也在琢磨CAD 的VBA二次开发,工作中需要,很多时候发现在重复的绘制相同结构只是尺寸稍有不同的图形,打算通过二次开发,建立菜单,通过输入参数直接生成想要的图形,省去人工绘图环节,提高效率,还能标准化,降低错误率,恳请楼主指教一二

点评

欢迎讨论交流  详情 回复 发表于 2018-4-27 18:40
 楼主| 发表于 2018-4-27 18:40:08 | 显示全部楼层 来自: 中国北京
wysong 发表于 2018-4-25 00:52# f) u6 u# L4 w. N  `/ a
向楼主学习了,真是会者不难,难者不会,前一段时间我也在琢磨CAD 的VBA二次开发,工作中需要,很多时候发 ...
/ P, K9 r7 X8 d! S) T( S
欢迎讨论交流
发表于 2018-5-5 20:56:32 | 显示全部楼层 来自: 中国江苏南京
问楼主一个问题,我们公司用的CAD是R14版本的,但是软件好像没有VBA编辑器,我输入VBAIDE的时候软件提示找不到,是怎么回事?是不是需要自己重新装一下CAD或者安装VBA?谢谢

点评

需要安装VBA模块  详情 回复 发表于 2018-5-13 22:52
 楼主| 发表于 2018-5-13 22:52:02 | 显示全部楼层 来自: 中国北京
wysong 发表于 2018-5-5 20:56
3 R! d! m3 H9 g. \$ Z4 h9 b问楼主一个问题,我们公司用的CAD是R14版本的,但是软件好像没有VBA编辑器,我输入VBAIDE的时候软件提示找 ...

: E! h' J: i; v+ [$ Q. f9 k需要安装VBA模块
发表于 2019-1-20 22:43:03 | 显示全部楼层 来自: 中国江苏南京
谢谢楼主,以后还请多指点
发表于 2019-1-20 23:07:07 | 显示全部楼层 来自: 中国江苏南京
woaishuijia 发表于 2018-5-13 22:52
4 q$ K; G' y$ T" c( O需要安装VBA模块
: E9 V+ y( F4 }/ B% T$ g/ {. \. _0 o
好像版本低了,装也装不上吧,大概是从2004版以后的才有
发表于 2019-1-21 00:06:08 | 显示全部楼层 来自: 中国江苏南京
另外,我还想请教楼主一个问题,一直困扰着我和我的同事:椭圆弧是不是用VBA画不了,但是可以画椭圆、圆和圆弧

点评

不是。 椭圆和椭圆弧是同一个对象"Ellipse"。它有起点角度“StartAngle“和终点角度“EndAngle“属性。 使用"AddEllipse“方法创建一个"Ellipse"对象时,需要三个参数,即:中心“Center“、椭圆长轴端点"MajorAxi  详情 回复 发表于 2019-1-21 04:28
 楼主| 发表于 2019-1-21 04:28:57 | 显示全部楼层 来自: 中国北京
本帖最后由 woaishuijia 于 2019-1-21 04:35 编辑 8 w+ }4 K5 B$ |5 h
wysong 发表于 2019-1-21 00:06
' c1 ~9 R' g1 [9 H6 I8 \" _$ l另外,我还想请教楼主一个问题,一直困扰着我和我的同事:椭圆弧是不是用VBA画不了,但是可以画椭圆、圆和 ...
3 D2 n/ G' b7 f) m/ M7 V+ ]  X$ Y
不是。( }; U4 F; U- G. `0 |
椭圆和椭圆弧是同一个对象"Ellipse"。它有起点角度“StartAngle“和终点角度“EndAngle“属性。
+ V+ a$ {7 u# G$ u- h; u5 b# L使用"AddEllipse“方法创建一个"Ellipse"对象时,需要三个参数,即:中心“Center“、椭圆长轴端点"MajorAxis"和半径比例"RadiusRatio"。其中第二个参数"MajorAxis"既是椭圆弧的起点,也是它的终点。创建时它的起点和终点是重合的,是一个完整的椭圆。编辑它的“StartAngle“和(或)“EndAngle“属性,让它的起点和终点不再重合,它就是一个椭圆弧。5 C- e: u( R9 C: Q
发表于 2019-1-21 22:18:03 | 显示全部楼层 来自: 中国江苏南京
woaishuijia 发表于 2019-1-21 04:28
' d. A1 ^/ G' W) w4 {8 z不是。
; D, ?* Z1 }- I2 e, v椭圆和椭圆弧是同一个对象"Ellipse"。它有起点角度“StartAngle“和终点角度“EndAngle“属性。  I5 w/ }1 n# g4 a2 n% c- y
...
& Z" ~( I0 B: S% E
楼主能否明示一下,帮忙写一下关键的代码,我没有找到你说这个起点、终点,圆弧命令中是有的,谢谢

点评

画出下图中蓝色椭圆弧 [attachimg]2337314[/attachimg]  详情 回复 发表于 2019-1-22 10:10
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

快速回复 返回顶部 返回列表