solidworks的宏程序怎么定义单位?

jy00304574

        


        今天用solidworks的宏程序在3D草图里面输入了一组坐标点的数据，运行宏后发现其数值放大了1000倍，后来从新操作录制了一条新的测试的宏，发现数值也是1000倍的差距，是不是宏程序里面的数值默认是米为单位？
        那么问题来了？怎么在宏程序里面把单位设置为毫米啊？

寂静天花板

你不如上传宏程序，来证明你的所言非虚

jy00304574

寂静天花板 发表于 2015-5-22 15:37
你不如上传宏程序，来证明你的所言非虚

' ******************************************************************************
% t- v" t( U. v" z' C:\Users\Administrator\AppData\Local\Temp\swx8008\Macro1.swb - macro recorded on 05/22/15 by Administrator
$ v! g5 E  q2 p* R' ******************************************************************************
+ @; {( c" X. C; E  e+ |- F2 [Dim swApp As Object

) R$ q" N6 |- o2 G3 N* v7 V; hDim Part As Object
6 U7 c. z$ W1 @. n, tDim boolstatus As Boolean
% |2 r4 d  U) }, lDim longstatus As Long, longwarnings As Long

Sub main()
' H: z" B; j" f+ o
3 c( w" P4 I: t! P7 o* `  |Set swApp = _
2 h! @7 ?2 O( L7 Z1 yApplication.SldWorks

Set Part = swApp.ActiveDoc
Dim skPoint As Object
Set skPoint = Part.SketchManager.CreatePoint(11111.11111, 11111.11111, 11111.11111)
Set skPoint = Part.SketchManager.CreatePoint(22222.22222, 22222.22222, 22222.22222)
Set skPoint = Part.SketchManager.CreatePoint(33333.33333, 33333.33333, 33333.33333)
+ Q/ b7 M2 \8 H. G$ Q0 `# \Set skPoint = Part.SketchManager.CreatePoint(44444.44444, 44444.44444, 44444.44444)
" u) C- o8 v/ g1 B. `End Sub

2 V6 j# S# t! }9 T4 ]6 A* E
3 c6 Z2 I" i3 _! k* A-------------------------------以上，进入3D草图后执行这个宏程序，结合EXCEL就能批量描点了，只是发现单位有问题，1000倍差距，不知道是哪里出了问题

' m  J8 K6 n; |( h8 E; H

ryouss

jy00304574 发表于 2015-5-22 15:58
3 I) `' ~: y1 }  j: |1 b' ******************************************************************************
' C:\Users\Admin ...

$ w) a! j. p+ U( T( u& i. O宏里所執行的尺寸值之單位皆內定為 " 米",
所以尺寸值原為 "mm" 者,在宏里皆要 除以 1000.

jy00304574

ryouss 发表于 2015-5-22 16:17
宏里所執行的尺寸值之單位皆內定為 " 米",
, g8 X: c5 j/ q8 Q8 J" W所以尺寸值原為 "mm" 者,在宏里皆要 除以 1000.

0 a; A  }) l5 M6 q% ~4 k所以说宏程序里面是没办法设定单位的了？
; Y2 q5 |# O- Y

ryouss

jy00304574 发表于 2015-5-22 16:18
: \- ]# P8 |0 W: m5 b所以说宏程序里面是没办法设定单位的了？

2 t' x) F" V* x# D! g; a' I: C是的,內定死的,改不了!(對一般使用者來說,若碰到大神動用.DLL,就不知道能改否)
) ]5 \: E$ V/ \

jy00304574

ryouss 发表于 2015-5-22 16:25
是的,內定死的,改不了!(對一般使用者來說,若碰到大神動用.DLL,就不知道能改否)

多谢了
" v5 U# q7 g4 {