TLHMQH 发表于 2008-11-4 23:53:00

[求助]怎样使getstring的值为nil?

本帖最后由 作者 于 2008-11-5 8:02:59 编辑 <br /><br /> <p>我在编写一段程序时,遇到下面的情况,就是当在<br/>(setq NR (getstring "\n请输入下个标注内容: "))段<br/>使用“回车”时，程序应当在<br/>(while (/= NR nil)段退出，<br/>可程序却继续运行到<br/>(setq pt (getpoint "\n请指定标注点:"))段，<br/>好象getstring值可以为nil<br/>还是(/= NR nil)不对<br/>不知错在那？请高手指正。<br/>先谢谢！</p><p><br/>(defun c:BZ()<br/>&nbsp; ; ……<br/>&nbsp; (setq NR (getstring "\n请输入标注内容: "))<br/>&nbsp; (while (/= NR nil)<br/>&nbsp; (setq pt (getpoint "\n请指定标注点:"))<br/>&nbsp; (command "text" pt 30 0 NR)<br/>&nbsp; (setq NR (getstring "\n请输入下个标注内容: ")))<br/>(princ)<br/>) <br/>昨天大意，修改了，谢谢指出！</p>

lyd2003001 发表于 2008-11-5 07:47:00

没看明白你想表达啥意思。可能我菜吧。为什么你问问题时带nil，可是程序中却没有。

Andyhon 发表于 2008-11-5 08:38:00

<p>Command: (getstring)<br/>""</p><p>so <br/>(while (/= NR "") ....)</p><p></p>

TLHMQH 发表于 2008-11-5 09:52:00

<strong><font face="Verdana" color="#61b713">谢谢Andyhon大侠！</font></strong>

carrot1983 发表于 2008-11-5 12:18:00

本帖最后由 作者 于 2008-11-5 12:35:47 编辑 <br /><br /> <p><strong><font face="Verdana" color="#61b713">TLHMQH </font></strong>好久不见,你去哪里////</p><p>回群吧..33410892</p><p>有啥问题,直接给你答案</p>

liminnet 发表于 2008-11-5 12:29:00

页: [1]
查看完整版本: [求助]怎样使getstring的值为nil?