catia宏命令录制测量几何体的质量命令无效

发布网友发布时间：2022-05-30 20:57

共2个回答

热心网友时间：2023-11-17 23:01

用Measurable对象，宏录制时录不出来的
Func GetAngleBetween(
CATIAReference
iMeasuredItem) As double

......
Dim reference1 As Reference
Set reference1 =
part1.CreateReferenceFromObject(object1)
Dim reference2 As Reference
Set
reference2 = part1.CreateReferenceFromObject(object1)
Dim TheSPAWorkbench As
Workbench
Set TheSPAWorkbench = CATIA.ActiveDocument.GetWorkbench (
"SPAWorkbench" )
Dim TheMeasurable As Measurable
Set TheMeasurable =
TheSPAWorkbench.Measurable(reference1)
Dim
MinimumDistance As double
MinimumDistance = TheMeasurable.GetAngleBetween(reference2)
......追问谢谢，能帮我解释一下这段代码的含义吗？

热心网友时间：2023-11-17 23:01

你好问题解决了么。。。

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com