Autocad VBA初级教程 （强烈推荐）

623552525

太好了！谢谢哦！

2005lyf

能提供教材下载就最好不过啦！

hbycld

社区币太少,努力赚钱中

ulyss

你太厉害了，非常感谢

hgdage

看来我还是应该慢慢把忘掉的东西拾起来,原来没学过的东西不一定没用,而有用的一定要不能忘呀!CAD我忘的太快了！

wt001

很好，我也要好好学学。。

新猎手

楼主提供的资料确实很好，值得认真学习一下。这方面的尝试做得不多，先感谢楼主的好资料！

tjp

首先感谢楼主的好资料！我得慢慢学习，在此请教在已有极径极角数据表（在EXSEL中）的情况下如何导入CAD来自动画出凸轮曲线。听说用VBA编个小程序，但我没编过，老师能帮这个忙吗？我的信箱为[email protected]

mint0316

过来看看
3 [( _  U3 Z' E( u: e$ \4 n但还是先从基础的学吧

gyc0201

我是CAD初学者，看了教程，虽然看得不太懂，感觉很不错，不知能不能学会！

jxjjmlx

第一课入门练习:

' E2 W: Y3 L/ a' i

  v! t# q6 E/ l/ n- }* S我在粘贴代码时好多怪怪的符号

jxjjmlx

第二课练习:
Sub c5()
Dim cc(0 To 2) As Double '声明坐标变量
/ R% m6 B/ z9 I2 @0 h( q2 r+ f' s$ Z/ jcc(0) = 4 '定义圆心座标
cc(1) = 2
8 l- d8 x* {% a7 l3 ~" }" Ccc(2) = 0
For i = 1 To 5 '开始循环
! |8 I8 K3 A+ q9 {2 k/ Z0 R  CCall ThisDrawing.ModelSpace.AddCircle(cc, i) '画圆
Next i
End Sub

crusader

谢谢楼主！希望继续写下去。

jxjjmlx

Autocad VBA初级教程 (第四课 程序的调试和保存)作业:
本课结束，请做思考题；监视下列代码中的i和j的值，注意，此题虽然要监视2个变量，但是在代窗口中只要设置1个断点就足够了。
sub test()
for i=2 to 4 step 0.6
% d# i3 ?* z+ ]8 B& ?for j=-5 to 2 step 5.5
next j
next i
End sub

4 ?: p/ h. J' P+ g9 V2 }4 d* A/ fi值:  2    2.6    3.2    3.8
. M$ ~: S8 |1 q2 C2 O( P# G3 Yj值:  -5    .5

jxjjmlx

感觉很难！第三课还不大明白，第四课作业也不知对不对，好象不大对，又没人来批改，