Catia VBA更改点位置

我的任务是创建一个宏，当选择一个点时，该点的坐标值需要显示在用户窗体中，如下所示

x、y和z的值应显示在文本框中 但有些点是“ONCURVE”或“ONSURFACE”类型，这些点不会显示x、y和z值。 这里有一张图片供参考

如您所见，第一点定义为坐标，第二点定义为“ONCurve”，第三点定义为“ONSURFACE”如何提取这些点的x y z坐标值。 我还需要通过改变文本框中的值来改变点的位置

我是新手，我对这类任务几乎一无所知

如何为此编写宏

---

谢谢

它们都是不同的点类型，但具有相同的基点类型，因此每个点的编辑可能不同。从VBA编辑器中的“插入对象分辨率”开始，然后从树中选择一个点。探索点对象的特性。您应该能够从每种类型中提取绝对坐标。再来一点代码，看看你在哪里卡住了。