CAD开发者社区 › 首页 ›AutoCAD开发文档› AutoCAD 2018 开发者帮助 › 查看内容

AutoCAD 2018 开发者帮助

Caption 属性（ActiveX）

2024-5-18 16:54| 发布者: admin| 查看: 71| 评论: 0|原作者: admin|来自: AutoCAD

Caption 属性（ActiveX）

获取用户看到的为应用程序或菜单项显示的文本。

支持的平台：仅限 Windows

签名

VBA：

object.Caption

对象

类型：应用程序、PopupMenuItem

此属性应用于的对象。

属性值

只读：否（对象除外）PopupMenuItem

类型：字符串

AutoCAD 应用程序窗口中显示的标题或弹出菜单上的菜单项的标题。

言论

对于菜单项，此属性是只读的，并且通过删除任何 DIESEL 字符串表达式从属性派生。Label

例子

VBA：

Sub Example_Caption()
    ' This example returns the caption for the current
    ' AutoCAD session.
    
    ' Get the Caption property
    Dim strCaption As String
    strCaption = ThisDrawing.Application.Caption
    MsgBox "The caption for this session is " & ThisDrawing.Application.Caption, , "Caption Example"
    
End Sub

可视化 LISP：

(vl-load-com)
(defun c:Example_Caption()
    ;; This example returns the caption for the current
    ;; AutoCAD session.
    (setq acadObj (vlax-get-acad-object))
    
    ;; Get the Caption property
    (setq strCaption (vla-get-Caption acadObj))
    (alert (strcat "The caption for this session is " strCaption))
)