取系统变量的问题

e688w

GetVariable (“LASTPROMPT”)只能取出最后一行啊！结果是：(210 0.0 0.0 1.0) (100 . "AcDbText") (73 . 0))


我想取dxf组码，那么长一串，只能取最后一行！
((-1 . <图元名: 7effd6f8>) (0 . "TEXT") (330 . <图元名: 7efa6c10>)
(5 . "1B2327") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "BH") (100 .
"AcDbText") (10 1.37754e+006 -882354.0 0.0) (40 . 116161.0) (1 . "safdg") (50 .
0.0) (41 . 0.8) (51 . 0.0) (7 . "_TCH_AXIS") (71 . 0) (72 . 0) (11 0.0 0.0 0.0)
(210 0.0 0.0 1.0) (100 . "AcDbText") (73 . 0))
不知道还有没有更好的取变量的方法！

fjfhgdwfn

通过日记文件可以全部取到。VBA中好像没有其他的好办法。