只需一步,快速开始
各位老师:
最近想做一个lisp文件,碰到了一点问题,详细说明如下:
(setq aa'(a b c d e f )
(setq bb'(1 2 3 4 5 6)
(setq cc '(1 2 3 4 5 6)
其中表 aa是字符串内容的表,要求输入aa表中的代号时,相应得到bb及cc表中的对应项,就像EXCLE电子表中用VLOOKUP一样输入参数作条件判断得到相应的对应项。该如何来做条件搜索及循环函数
制作该程序的动机 是想把GB288-94轴承的所有参数做到表中,在绘图时不需要查标准。请老师们指点一二。谢谢
使用道具 举报
(setq a '("a" "b" "c" "d"))(setq b '(1 2 3 4 5) c '(11 22 33 44 55))
(setq dd(vl-position "a" a))
(nth dd b)
(nth dd c)
本版积分规则 发表回复 回帖后跳转到最后一页
小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 ) ©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途
GMT+8, 2024-10-2 14:31 , Processed in 0.170646 second(s), 26 queries , Gzip On.
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.