错误: 参数类型错误: lentityp nil

xhshine

下面一个函数为输出带属性块儿的属性值，在有些地方运行不会出现错误:；可有时候会出现：更改请输入<1>,空格接受默认值<DN; 错误: 参数类型错误: lentityp nil，不知道什么原因，请朋友帮忙！

(defun alluse6()



  (princ "更改请输入<1>,空格接受默认值<DN")
  (setq this_list(entget (entnext (entlast))))
  (princ (cdr (assoc 1 this_list)))
  (princ ">")
  (princ)
  (setq attsell(getint))
  (if(= attsell 1) (command "eattedit" (entlast) ""));打开最后一个属性块的增强属性编辑器




  (setq lst (entget (entnext (entlast))))
  (setq s(assoc 1 lst))
  (setq step(+ step 1))






  )

ZZXXQQ

  (setq this_list (entget (entnext (entlast))))
上句中(entlast)已经是最后的实体了，用entnext只能返回nil。所以entget出错。