只需一步,快速开始
使用道具 举报
输入200想出结果02
(defun c:tt ( ) (setq tg (getreal "num")); 200,250 (if (/= 0 (substr (rtos tg) 2 1)) (setq g (substr (rtos tg) 1 2)) (progn (setq b (substr (rtos tg) 1 1)) (setq b (strcat "0" b)) ) );endif ;(list b) (princ))
; 输入200 结果子 空值??
(if (/= 0 (substr (rtos tg) 2 1))
=>
(if (/= "0" (substr (rtos tg) 2 1))
总有好心人,非常感谢
本版积分规则 发表回复 回帖后跳转到最后一页
小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 ) ©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途
GMT+8, 2025-2-22 16:29 , Processed in 0.177064 second(s), 25 queries , Gzip On.
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.