看来我还是应该慢慢把忘掉的东西拾起来
看来我还是应该慢慢把忘掉的东西拾起来,原来没学过的东西不一定没用,而有用的一定要不能忘呀!CAD我忘的太快了!:Q 很好,我也要好好学学。。 楼主提供的资料确实很好,值得认真学习一下。这方面的尝试做得不多,先感谢楼主的好资料! 首先感谢楼主的好资料!我得慢慢学习,在此请教在已有极径极角数据表(在EXSEL中)的情况下如何导入CAD来自动画出凸轮曲线。听说用VBA编个小程序,但我没编过,老师能帮这个忙吗?我的信箱为[email protected] 过来看看但还是先从基础的学吧 我是CAD初学者,看了教程,虽然看得不太懂,感觉很不错,不知能不能学会!:( 第一课入门练习:
我在粘贴代码时好多怪怪的符号 第二课练习:
Sub c5()
Dim cc(0 To 2) As Double '声明坐标变量
cc(0) = 4 '定义圆心座标
cc(1) = 2
cc(2) = 0
For i = 1 To 5 '开始循环
Call ThisDrawing.ModelSpace.AddCircle(cc, i) '画圆
Next i
End Sub
谢谢楼主!希望继续写下去。 Autocad VBA初级教程 (第四课 程序的调试和保存)作业:
本课结束,请做思考题;监视下列代码中的i和j的值,注意,此题虽然要监视2个变量,但是在代窗口中只要设置1个断点就足够了。
sub test()
for i=2 to 4 step 0.6
for j=-5 to 2 step 5.5
next j
next i
End sub
i值:2 2.6 3.2 3.8
j值:-5 .5 感觉很难!第三课还不大明白,第四课作业也不知对不对,好象不大对,又没人来批改,:L