请给我解释一下这段代码

Question

Private Sub cmdApply_Click()
  '定义变量和对象
  Dim adText As AcadText
    Dim adMText As AcadMText
    Dim adSS As AcadSelectionSet
  上面这个定义什么样的变量啊？这是CAD二次的一段代码.......

Answer 1

Dim adText As AcadText   ';定义adText 为CAD中的单行文本. 相当于用 T 命令建立的文本.
    Dim adMText As AcadMText  ';定义dMText 为CAD中的多行文本. 相当于用 MT 命令建立的文本.
    Dim adSS As AcadSelectionSet ';定义adSS 为CAD中的一个选择集.相当于,无命令状态下选择的CAD项目.

Answer 2

难道现在CAD不流行用AUTOLISP了?