只需一步,快速开始
请问,在程序中如果数字循环是:
(setq i 1) (while (<= i 10)
……………… (setq i (+ i 1)) )
字母循环怎么写了,别笑我问的问题简单啊
使用道具 举报
用ASCII这个函数
(setq v "A");
(setq i 1) (while (<= i 26)
………… (command "text" v); (setq v(chr(1+(ascii v))));
(setq v(itoa(1+(atoi v)))) (setq i (+ i 1)) )
怎么从第二个开始就又是1了?
不是用atoi,用Chr
刚换了,怎么到B那儿就有问题了。
; 错误: 参数类型错误: numberp: "B"
标准答案应该是用ASCII ,Chr函数,学院式解答。
但建筑常用的字母,i、o、z不准用,写程序挺麻烦的。
其实你也可以直接定义一个表,大小写加起来才(26-3)*2个,按顺序历遍。
'("A""B""C"......),
本版积分规则 发表回复 回帖后跳转到最后一页
小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 ) ©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途
GMT+8, 2025-2-22 17:03 , Processed in 0.161289 second(s), 25 queries , Gzip On.
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.