冰凝冰
发表于 2008-2-6 09:48
不懂,
我刚入道,还不懂.
先项吧
边远清秀
发表于 2008-2-6 10:54
刚学CAD,看不大懂,但感觉是好东西,支持.
天之宇海之翔
发表于 2008-2-7 14:27
顶,看不太懂啊
wpg1118
发表于 2008-2-12 09:26
好东西当然要支持！！
adlee
发表于 2008-2-12 21:50
谢谢楼主咯 收下! 呵呵
HNHTWWQ
发表于 2008-2-22 22:39
看不懂~~先顶了呵呵
wutiwudi
发表于 2008-2-22 23:18
大好人，一定要顶
chnxgd
发表于 2008-4-5 21:33
第五课 画函数曲线的一个问题
第五课有一个作业，画抛物线y=0.5*x*x+3x[-50，50]。我写了一个程序如下，监测显示参数都没问题，可在autocad中画出来的图形不对，能看看问题出在哪儿吗？
Sub PaoWuXian()
Dim p(0 To 101) As Double
Dim a As Integer
Dim i, j As Integer
For j = 1 To 100 Step 1
a = -50 + j
p(j) = a
p(j + 1) = 0.5 * a * a + 3
Next j
ThisDrawing.ModelSpace.AddLightWeightPolyline (p)
ZoomExtents
End Sub
chnxgd
发表于 2008-4-5 21:40
画出来的图形如下
画出来的图形如下，明显不对
chnxgd
发表于 2008-4-5 21:42
正确图形
正确图形应该这样：（我用excel数据绘制出的正确抛物线图形）
nankaiydq
发表于 2008-4-5 23:20
顶!!:) :victory:
zweiyue
发表于 2008-4-11 23:45
谢谢楼主。太好了。我现在终于知道我们学了cad后要学用vb画图了。
zweiyue
发表于 2008-4-11 23:52
回复 #1 cad 的帖子
请问楼主，那边有Autocad VBA的资料可以下载的？这样一点点地开比较麻烦，我想下载下来看。
billphone
发表于 2008-4-12 07:56
版主好样的,向你学习!
hawkniu
发表于 2008-4-12 08:56
好东西啊，学习啦