ホーム / ボディ属性の設定 / CBodyAttribute / プロパティ / Current

Currentプロパティ

定義

Current (Index As Long) As CCurrent

引数

Index

ボディ属性のインデックス番号

解説

CCurrentクラスの参照を返します。

実行例

Dim Femtet As New CFemtet
Dim Btr As CBodyAttribute

If Femtet.OpenNewProject() = False Then
  Femtet.ShowLastError
End If

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

Btr.Add "BodyAttributeA"

Btr.Current(0).Angle = -45