Block プロパティ(ActiveX)

レイアウトまたはマルチ引出線スタイルに関連付けられているブロックを指定します。

サポートされているプラットフォーム: Windows のみ

構文と要素

VBA:

object.Block

object

タイプ: Layout、MLeaderStyle

このプロパティが適用されるオブジェクト。

プロパティの値 - Layout

読み込み専用: はい

タイプ: Block

レイアウトに関連付けられたブロック

プロパティの値 - MLeaderStyle

読み込み専用: いいえ

タイプ: 文字列

マルチ引出線スタイルのブロック ID。

注意

追加の注意はありません。

例

VBA:

Sub Example_LayoutBlock()
    ' This example finds the name of the block associated with a layout.
    
    Dim xBlock As AcadBlock
    Set xBlock = ThisDrawing.ActiveLayout.Block
    
    MsgBox "The active layout corresponds to block: " & xBlock.name
End Sub

Visual LISP:

(vl-load-com)
(defun c:Example_LayoutBlock()
    ;; This example finds the name of the block associated with a layout.
    (setq acadObj (vlax-get-acad-object))
    (setq doc (vla-get-ActiveDocument acadObj))
  
    (setq xBlock (vla-get-Block (vla-get-ActiveLayout doc)))
    
    (alert (strcat "The active layout corresponds to block: " (vla-get-Name xBlock)))
)