(defun c:shuru ()
(initget "dn15 dn20dn25 dn32")
(setq var (getkword "请输入字符串[dn15,dn20,dn25,dn32]<dn25>"))
(princ var)
(princ)
)
以上是我编写的代码,运行效果如下图。显示效果可以用鼠标选择,但实际上选择无效,结果始终是nil,必须用键盘输入才能得到正确结果
万能的吧友有谁知道是什么原因

(initget "dn15 dn20dn25 dn32")
(setq var (getkword "请输入字符串[dn15,dn20,dn25,dn32]<dn25>"))
(princ var)
(princ)
)
以上是我编写的代码,运行效果如下图。显示效果可以用鼠标选择,但实际上选择无效,结果始终是nil,必须用键盘输入才能得到正确结果
万能的吧友有谁知道是什么原因
