ホーム / モデリング / CGaudi / プロパティ / Body

Bodyプロパティ

定義

Body(BodyKey As Long) As CGaudiBody

値の取得		○
値の設定		×

引数

BodyKey

取得を希望するBodyのBodyKey

解説

BodyKeyで指定されたBodyをCGaudiBodyとして取得します。
存在しないBodyKeyを指定した場合は、CGaudiBodyはNothingとなります。
戻り値のCGaudiBodyがNothingの場合はLastErrorMsg(プロパティ)によりエラーの内容を確認してください。

実行例

Dim FEMTET As New CFemtet

 

' 新規プロジェクト作成

FEMTET.NewProject "C:\temp\Sample.femproj", True

 

'モデルを作成

Dim P As New CGaudiPoint

P.SetCoord 0, 0, 0

Dim Body As CGaudiBody

Set Body = FEMTET.Gaudi.CreateBox(P, 10, 10, 10)

 

'名前と材料名を設定する

Body.SetName "SampleBody", "SampleMaterial"

 

'作成したモデル(Body)をボディキーで検索

Dim SearchBody As CGaudiBody

Set SearchBody = FEMTET.Gaudi.Body(Body.BodyKey)

 
MsgBox (SearchBody.BodyAttributeName)