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

zjzllll · 发表于 2006-12-30 20:58

很好的教程，顶了

horticulture · 发表于 2007-1-2 14:19

连续圆
Sub myl()
Dim p1 As Variant '申明端点坐标
Dim p2 As Variant
p1 = ThisDrawing.Utility.GetPoint(, "输入点:") '获取点坐标

On Error GoTo Err_Control '出错陷井
Do '开始循环
  p2 = ThisDrawing.Utility.GetDistance(p1, vbCr & "输入半径:")  '获取的半径

  Call ThisDrawing.ModelSpace.AddCircle(p1, p2) '画圆

Loop
Err_Control:

End Sub

lvyin · 发表于 2007-1-3 22:08

好贴，俺收下啦

罗卜头 · 发表于 2007-1-9 14:43

要是有视频就太好了,顶顶顶

kient88 · 发表于 2007-1-12 16:28

受用了。谢谢！

evqeico · 发表于 2007-1-13 01:11

很棒呵呵顶下

wangwei3350 · 发表于 2007-1-13 16:30

现在时间很紧迫现在看看大概，有时间一定看完

s02wj · 发表于 2007-1-14 13:17

好,一定好好学习

zyasan · 发表于 2007-1-15 00:44

确实非常不错!!!

wzjasj · 发表于 2007-1-17 00:18

高手
谢谢

康照东 · 发表于 2007-1-17 11:37

天底下有这等好东西，真是出乎意料，我用线性帮助自定义过特殊线形，差点没厥死，我考到自己机子里放大字体好好看，是不是要做这些先学Basic 会容易点

康照东 · 发表于 2007-1-17 16:42

看完了，原来编程都差不多，我学过forture，这个还能看懂，还有没有新的内容，继续发啊，

谢谢

joy9858 · 发表于 2007-1-18 20:26

感觉很迷茫.....和CAD不一样
不过我还是初学者

cncc · 发表于 2007-1-19 23:15

一初学者,以后还请各位老师多多帮忙

sen2929 · 发表于 2007-1-23 19:58

棒级,再多点教程!

		自动登录	找回密码
密码			立即注册

[开发] Autocad VBA初级教程（强烈推荐）

今天没时间看完，下次再来

回复 #6 cad 的帖子

[开发] Autocad VBA初级教程 （强烈推荐）

今天没时间看完，下次再来

回复 #6 cad 的帖子

[开发] Autocad VBA初级教程（强烈推荐）