GetVariable メソッド(ActiveX)

AutoCAD システム変数の現在の設定を取得します。

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

構文と要素

VBA:

RetVal = object.GetVariable(Name)

object

タイプ: Document

このメソッドが適用されるオブジェクト。

Name

アクセス: 入力のみ

タイプ: 文字列

返される変数名。実際に存在するシステム変数名でなければなりません(大文字と小文字は区別されません)。

戻り値(RetVal)

タイプ: バリアント型

指定されたシステム変数の値

注意

すべての AutoCAD システム変数およびそのタイプの一覧については、AutoCAD のヘルプ システムの「システム変数」を参照してください。

例

VBA:

Sub Example_GetVariable()
    ' This example finds the current setting of the
    ' system variable FILLMODE.
    
    Dim sysVarName As String
    Dim varData As Variant
    
    sysVarName = "FILLMODE"
    varData = ThisDrawing.GetVariable(sysVarName)
    MsgBox sysVarName & " = " & varData, , "GetVariable Example"
    
End Sub

Visual LISP:

(vl-load-com)
(defun c:Example_GetVariable()
    ;; This example finds the current setting of the
    ;; system variable FILLMODE.
    (setq acadObj (vlax-get-acad-object))
    (setq doc (vla-get-ActiveDocument acadObj))
    
    (setq sysVarName "FILLMODE")
    (setq varData (vlax-variant-value (vla-GetVariable doc sysVarName)))
    (alert (strcat sysVarName " = " (itoa varData)))
)