1)当点P5的y坐标大于点P2的y坐标时，誊写基点为图5中的点P4，文本对齐方法必要按照字符a1、a2的宽度判定。起首用len()函数取a1、a2的字符个数，再用MAX()函数取字符最大值，最后通过公式(字符个数×字符高度×0.75)计较a1、a2字符的最大宽度，液压缸，设为L。若L大于P3P4的长度，对齐方法为BR即右下对齐;不然对齐方法为中心对齐。文本旋转角度为线段P3P4与X轴的夹角;

　　2外貌粗拙度标注的根基划定

　　插入点简直定如图5所示，粗拙度标记的尖端(插入点)应落在零件外观线、尺寸界限、尺寸线或其延迟线上。插入点为拾取标注工具时的鼠标拾取位置。插入进程分以下两种环境：若拾取工具为直线、多义线、尺寸线、尺寸界限、圆或圆弧，则需拾取另一点用来确定插入方位完成外貌粗拙度标记的绘制;若拾取工具为空，则在鼠标拾取位置直接插入外貌粗拙度标记。

　　Step4：选摘要标注的工具确定响应的参数。

　　GetpointPolar(P2，(α*180/pi+120)*pi/180，10)

　　1题目的提出

　　1)当标注工具为直线、多义线、尺寸线或尺寸界限时(如图5a所示)，个中P2为插入点，点P1为点P2的引出线且P1P2垂直于拾取的标注工具P2P0。绘制进程为：先行使实体工具的StartPoint属性和EndPoint属性得到所选实体的出发点坐标和终点坐标计较实体线段的斜率;然后通过计较求得P1P2的斜率，再用Atn()函数求得线段P1P2和石轴的夹角α(rad)，如图5a所示，转换为角度值即α×180/π;则P3P2相对X轴的角度为α×180/π+30°。

　　通过菜单选择，进入用户窗体。

　　4措施计划流程及实例应用

　　GetpointPolar函数的三个输入值别离为：基准点、相对X轴的旋转角度(以弧度为单元)、偏移间隔。基准点即要参考的点;偏移间隔是指未知点与参考点的间隔;而旋转角度值简直定分为两种环境：

　　外貌粗拙度标注实譬喻图6所示。

　　编写极坐标求点函数GetpointPolar()，求出插入点P2后，以P2为基准点求其他未知点举办粗拙度标记的绘制。

　　3智能化标注的实现

　　6)d值暗示加工纹理偏向，回收列表框选择的方法举办输入。

　　GetpointPolar(ByValptbaseAsVariant，ByValangleAsDouble，ByVallengthAsDouble)

　　图1外貌粗拙度标记的比例

　　4.1措施计划流程

　　3.2粗拙度标记的绘制

　　表1外貌粗拙度标记比例的尺寸