用VBA对Auto CAD2000平台表面粗糙度自动标注

Automatic Marking of Surface Roughness Based on VBA

用VBA对AutoCAD2000平台上表面粗糙度的自动标注进行了开发。根据国家标准用VBA创建了表面粗糙度的块和属性;用对话框实现了表面粗糙度符号类型、比例、糙值的选择;用矢量法实现了对插入块的角度、尖端指向的判定。使表面粗糙度符号实现了自动标注。

A method for automatic marking surface roughness on AutoCAD desk with VBA is developed. By national standard the block and attribute of surface roughness are created with VBA. The style, scale of symbol and the value selection of surface roughness are realized in dibox. The inserted angle and directional acme of surface roughness are determined in vector. As a result, the surface roughness symbol can be automatically marked.