664571221 发表于 2021-12-31 17:20:14

各位大神 这个是一个记忆的程序，能不能做一个删除这个记忆的程序

各位大神 这个是一个记忆的程序，能不能做一个删除这个记忆的程序
(defun c:QFH(/ en pt1)
   (setvar "osmode" 0)
   (if val(princ (strcat "\n符号<" (vl-princ-to-string val) ">"))(setq val (getstring"\n请输入符号:")))   
   (setvar "osmode" 35)(princ))


masterlong 发表于 2021-12-31 19:02:25

第1个val改nil

664571221 发表于 2021-12-31 20:32:53

masterlong 发表于 2021-12-31 19:02
第1个val改nil

谢谢大神可以了...
页: [1]
查看完整版本: 各位大神 这个是一个记忆的程序，能不能做一个删除这个记忆的程序