Version 属性 (ActiveX) 
获取您正在使用的 AutoCAD 应用程序的版本。 支持的平台:仅限 Windows 属性值只读:是的 类型:字符串 您正在使用的 AutoCAD 版本。 言论注意:此属性的值存储在 ACADVER 系统变量中。 
例子VBA: Sub Example_Version()
    ' This example returns AutoCAD version as a string
    
    Dim version As String
    version = ThisDrawing.Application.version
    MsgBox "This is AutoCAD Version " & version, , "Version Example"
    
End Sub
可视化 LISP: (vl-load-com)
(defun c:Example_Version()
    ;; This example returns AutoCAD version as a string
    (setq acadObj (vlax-get-acad-object))
    (setq doc (vla-get-ActiveDocument acadObj))
    
    (setq version (vla-get-Version acadObj))
    (alert (strcat "This is AutoCAD Version " version))
)
 | 
|Archiver|CAD开发者社区
( 苏ICP备2022047690号-1   苏公网安备32011402011833)
GMT+8, 2025-11-4 14:08
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.