marain 发表于 2004-11-25 12:05:00

如何取得cad图的范围

请教用vba如何取得cad图的长和宽（图形单位）


或x，y的最大最小值


谢谢

yulijin608 发表于 2004-11-25 15:19:00

Sub test()<BR>Dim p As Variant<BR>Dim q As AcadDocument<BR>Set q = ThisDrawing<BR>p = q.Limits<BR>MsgBox p(0) &amp; " " &amp; p(1) &amp; " " &amp; p(2) &amp; " " &amp; p(3)<BR>End Sub

tiger8888 发表于 2004-11-25 18:11:00

好像不是这样的吧。


如果是我的话，会选择extmax和extmin两个系统变量

yulijin608 发表于 2004-11-25 18:38:00

对,3楼说的对.

marain 发表于 2004-11-26 15:35:00

hehe,搞定了，谢谢二位
页: [1]
查看完整版本: 如何取得cad图的范围