ホーム / モデリング / CGaudiBody / プロパティ / MaterialName

MaterialNameプロパティ

定義

MaterialName As String

値の取得		○
値の設定		×

引数

ありません

解説

CGaudiBodyのMaterial名を取得します。

実行例

メッセージボックスにMaterial名を表示します
Dim Femtet As New CFemtet
Dim Gaudi As CGaudi
Dim Body As CGaudiBody
Dim Point As New CGaudiPoint

'新規プロジェクト作成
If Femtet.OpenNewProject() = False Then
    Femtet.ShowLastError
End If

'Femtet.Gaudiを変数Gaudiに代入して使いやすくする
Set Gaudi = Femtet.Gaudi



Point.SetCoord 0, 0, 0

Set Body = Gaudi.CreateBox(Point, 3, 3, 5)
If Body.SetName("Box", "Wood") = False Then
    Femtet.ShowLastError
End If

MsgBox Body.MaterialName, vbInformation, "材料名"