Label プロパティ(ActiveX)

ユーザに表示されるときのメニュー項目の内容と形式を指定します。

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

構文と要素

VBA:

object.Label

object

タイプ: PopupMenuItem

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

プロパティの値

読み込み専用: いいえ

タイプ: 文字列

ポップアップ メニュー項目のラベル

注意

Caption プロパティとは異なり、このプロパティには、表示されるたびに条件によってラベルを変更する DIESEL 文字列式が含まれることがあります。

例

VBA:

Sub Example_Label()
    ' This example iterates through the first menu in the menu bar
    ' and displays the label for each menu item.
    
    Dim menuItem As AcadPopupMenuItem
    Dim menuLabel As String
    menuLabel = ""
    
    For Each menuItem In ThisDrawing.Application.MenuBar.Item(0)
        menuLabel = menuLabel & menuItem.Label & vbCrLf
    Next menuItem
    MsgBox menuLabel
    
End Sub

Visual LISP:

(vl-load-com)
(defun c:Example_Label()
    ;; This example iterates through the first menu in the menu bar
    ;; and displays the label for each menu item.
    (setq acadObj (vlax-get-acad-object))
    
    (setq menuLabel "")
    
    (vlax-for menuItem (vla-Item (vla-get-MenuBar acadObj) 0)
        (setq menuLabel (strcat menuLabel (vla-get-Label menuItem) "\n"))
    )

    (alert menuLabel)
)