VB中使用AutoCAD系统变量

系统变量是AutoCAD为其运行环境设置的参数，可分为整数型、实数型、点型、布尔型恶化字符串型，大多数系统变量是可读可写的，个别的系统变量是只读变量，不能进行写操作。

利用SetVariable方法对AutoCAD系统变量进行设置。

acadapp.SetVariable Name, Value

object系统变量的设置对象，name系统变量名，value系统变量值。

如下代码将系统变量的GRIDMODE值设置为1。

acadapp.ActiveDocument.SetVariable "gridmode", 1

利用GetVariable方法可获取系统变量值。

getval = acadapp.GetVariable(Name)

object系统变量设置对象，name系统变量名，getval系统变量值。

Dim getval As Variant
getval = acadapp.ActiveDocument.GetVariable("gridmode")

上述代码取得系统变量gridmode的值并赋给getval。