国服第一小鱼人s7符文:利用VB开发AUTOCAD编程高手请进

来源:百度文库 编辑:神马品牌网 时间:2024/04/29 04:43:52
我想标注角度
标注角度函数如下:
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度路径.
起始点和终止点我也特意留意了,可是当尺寸变化时,经常出现上叙情况.