中科新闻网福州胪雷新城公租房:利用VB开发AUTOCAD编程高手请进
来源：百度文库 编辑：中科新闻网 时间：2024/05/14 16:09:12
我想标注角度
标注角度函数如下:
public sub dim_angular
set dimobj_a=_
acadapp.activedocument.modespace.adddim3pointangular_(angvert,firstpoint,secondpoint,textpoint)
dimobj_a.extensionlineoffset=0
dimobj_a.arroweadsize=3
dimobj_a.dimensionlineweight=aclnwt005
dimobj_a.extensionlineweight=aclnwt005
dimobj_a.textheight=4
end sub
可是标注的时候出现这样的情况:
例如我要标注30度角,可是有时候生成的图形它标注的走的是330度路径.
起始点和终止点我也特意留意了,可是当尺寸变化时,经常出现上叙情况.
标注角度函数如下:
public sub dim_angular
set dimobj_a=_
acadapp.activedocument.modespace.adddim3pointangular_(angvert,firstpoint,secondpoint,textpoint)
dimobj_a.extensionlineoffset=0
dimobj_a.arroweadsize=3
dimobj_a.dimensionlineweight=aclnwt005
dimobj_a.extensionlineweight=aclnwt005
dimobj_a.textheight=4
end sub
可是标注的时候出现这样的情况:
例如我要标注30度角,可是有时候生成的图形它标注的走的是330度路径.
起始点和终止点我也特意留意了,可是当尺寸变化时,经常出现上叙情况.