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

623552525

太好了！谢谢哦！

2005lyf

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

hbycld

社区币太少,努力赚钱中

ulyss

你太厉害了，非常感谢

hgdage

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

wt001

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

新猎手

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

tjp

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

mint0316

过来看看
; I; v5 F4 |4 R& p. i5 w但还是先从基础的学吧

gyc0201

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

jxjjmlx

第一课入门练习:
7 N6 y: Z9 I0 X5 D0 Y
* y2 S' J( H5 s2 ^/ i6 Y: S
- z8 }  ~. z" G4 j" ^! s7 [
我在粘贴代码时好多怪怪的符号

jxjjmlx

第二课练习:
Sub c5()
Dim cc(0 To 2) As Double '声明坐标变量
& B9 w1 c5 F) l) h1 Wcc(0) = 4 '定义圆心座标
cc(1) = 2
cc(2) = 0
For i = 1 To 5 '开始循环
5 w. e" u: G! e! j6 e* s6 vCall ThisDrawing.ModelSpace.AddCircle(cc, i) '画圆
2 D2 ?' W$ q0 L: ENext i
End Sub
7 L, G! j! v# X1 a% S1 X$ x- b- F

crusader

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

jxjjmlx

Autocad VBA初级教程 (第四课 程序的调试和保存)作业:
本课结束，请做思考题；监视下列代码中的i和j的值，注意，此题虽然要监视2个变量，但是在代窗口中只要设置1个断点就足够了。
sub test()
0 @6 u9 Y$ ^, u) Q& _for i=2 to 4 step 0.6
for j=-5 to 2 step 5.5
next j
next i
End sub

% |8 I- j: j6 o) G! b; ei值:  2    2.6    3.2    3.8
j值:  -5    .5

jxjjmlx

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