CATIA vb.NETのリネームポイント

Question

CATIAの名前をvb.NETに変更します。 これは私のコードです：

Dim myPoint As MECMOD.GeometricElement 

myProductDoc.Selection.Search("(Name='ABC' & CATGmoSearch.Point),all") 
myPartNumber = myProductDoc.Product.Products.Item(i + 1).Name 
myPartNumber = myPartNumber.Substring(0, myPartNumber.LastIndexOf(".", myPartNumber.LastIndexOf(".") - 1)) 

myPoint = myProductDoc.Selection.Item2(2).Value 
myPoint.Name = "AB_" & myPartNumber 

Problem is in this line: 
myPoint = myProductDoc.Selection.Item2(2).Value 

誰も助けることができますか？

THX

Answer 1

ポイントの名前は現在ABCになり、ABに変更される予定です。 私はこの問題は、この行であることを推測する：MECMOD.GeometricElement

として

薄暗いmyPointこれは3DポイントであるとGeometricELementは2Dのみの要素のためです。しかし、私は3D要素のために何を選ぶべきか分かりません。

Answer 2

私はこの問題を解決しました。

それはないですします。Dim myPoint MECMOD.GeometricElement しかし通ります。Dim myPoint MECMOD.HybridShape