形位公差标注

xkitty 发表于 2004-5-31 21:43:00

clement，谢谢您，您真神了，手到病除！还有一个问题。

用VBA编程,创建几何公差对象，调用AddTolerance方法时，机械制图符号中径向跳动的转义字符如何表示？基准代号程序的编制是从引线编制入手还是另有捷径？希望您能多多指点。thank you!!

雪山飞狐_lzh 发表于 2004-5-31 23:02:00

找clement，没我什么事，^_^

mccad 发表于 2004-6-1 07:33:00

Sub Example_AddTolerance()

   Dim toleranceObj As AcadTolerance
            Dim textString As String
            Dim insertionPoint(0 To 2) As Double
            Dim direction(0 To 2) As Double

            textString = "{\Fgdt;j}%%v位置度-j" & vbCrLf & _
                                    "{\Fgdt;r}%%v同轴度-r" & vbCrLf & _
                                    "{\Fgdt;i}%%v对称度-i" & vbCrLf & _
                                    "{\Fgdt;f}%%v平行度-f" & vbCrLf & _
                                    "{\Fgdt;b}%%v垂直度-b" & vbCrLf & _
                                    "{\Fgdt;a}%%v倾斜度-a" & vbCrLf & _
                                    "{\Fgdt;g}%%v圆柱度-g" & vbCrLf & _
                                    "{\Fgdt;c}%%v平面度-c" & vbCrLf & _
                                    "{\Fgdt;e}%%v圆度-e" & vbCrLf & _
                                    "{\Fgdt;u}%%v直线度-u" & vbCrLf & _
                                    "{\Fgdt;d}%%v面轮廓度-d" & vbCrLf & _
                                    "{\Fgdt;k}%%v线轮廓度-k" & vbCrLf & _
                                    "{\Fgdt;h}%%v圆跳动度-h" & vbCrLf & _
                                    "{\Fgdt;t}%%v全跳动度-t" & vbCrLf & _
                                    "{\Fgdt;l}%%vl" & vbCrLf & _
                                    "{\Fgdt;m}%%vm" & vbCrLf
            insertionPoint(0) = 5#: insertionPoint(1) = 5#: insertionPoint(2) = 0#
            direction(0) = 1#: direction(1) = 0#: direction(2) = 0#

            Set toleranceObj = ThisDrawing.ModelSpace.AddTolerance(textString, insertionPoint, direction)
            ZoomAll

End Sub

xkitty 发表于 2004-6-1 10:00:00

mccad，谢谢你为我提供这末详细的解答！再解一下惑行吗？程序中坐标值后面的#号是何意？基准代号程序的编制如何入手？指的是圆圈下的小垂直符号。

雪山飞狐_lzh 发表于 2004-6-1 10:34:00

#号表示一个浮点数,VB要好好补补

clement 发表于 2004-6-1 16:41:00

不好意思,刚刚看到,既然管理员已经回答了最开始的问题,那我就对第二个问题说几句.

<A href="类型声明字符</A>(数字后面的符号后缀)可以起到表明数据类型的作用

Double 的<A href="类型声明字符</A>为井号#

Single 的<A href="类型声明字符</A>为感叹号!

Long 的<A href="类型声明字符</A>为和号&

Integer 的<A href="类型声明字符</A>是百分比符号%

齿轮设计 发表于 2004-10-31 12:47:00

高手，真是高手。十二万分佩服

fortangtang 发表于 2007-6-1 12:55:00

请问怎样把形位公差的数据提出来?

xds520007 发表于 2009-7-22 10:30:00

怎样加后面的基准呢？

xds520007 发表于 2009-7-22 11:16:00

我知道怎样加后面的基准了！谢谢指点

页: [1] 2

明经CAD社区's Archiver

形位公差标注