<< 前へ        次へ >>

ID : 183

CurWork

機能

現在のワーク座標系番号を返します。

構文

CurWork

戻り値

現在のワーク座標系番号(0~7)を整数型データで返します。

解説

現在のワーク座標系番号を返します。戻り値は0~7の整数型データです。

注意事項

-

用例

'!TITLE "ユーザ座標系番号の取得"
' 現在設定されているユーザ座標系番号をメッセージ出力ウィンドウに表示
Sub Sample_CurWork

  Dim aaa As Integer

  TakeArm Keep = 1

  ' ユーザ座標系番号を1に変更
  ChangeWork 1

  ' 現在のユーザ座標系番号をaaaを代入
  aaa = CurWork

  ' メッセージ出力ウィンドウに現在のユーザ座標系番号"1"を表示
  PrintDbg aaa

End Sub

ID : 183

<< 前へ        次へ >>