自贡黄明儒 发表于 2022-5-16 13:32:05

member wcmatch某种程序上相互替代

正如repeat foreach mapcar均可用while来写，在某种程序上，member wcmatch相互替代
;;判断SCore是否为"1" "2" "3"
(setq SCore "4")
(member SCore (list "1" "2" "3"));方法一
(wcmatch SCore "1,2,3");方法二
(or (= SCore "1")(= SCore "2")(= SCore "3"));方法三

vectra 发表于 2022-5-16 14:22:35

(<= "1" SCore "3")

菜卷鱼 发表于 2022-5-16 15:12:17

(vl-some '(lambda(x) (= x SCore)) '("1" "2" "3"))

pzweng 发表于 2022-5-16 14:45:23

看不懂看不懂

masterlong 发表于 2022-5-16 14:45:59

(<= "1" "11" "3")

自贡黄明儒 发表于 2022-5-16 15:00:30

在SCore值比较明确的情况下，如对话框返回值，V长老的判断还是可用的。

guosheyang 发表于 2022-5-17 08:26:08

还可用Vl-positⅰOn

pengfei2010 发表于 2022-5-19 13:31:11

菜卷鱼 发表于 2022-5-16 15:12
(vl-some '(lambda(x) (= x SCore)) '("1" "2" "3"))

效率！！！！！！

nzl1116 发表于 2022-5-21 11:22:46

(assoc SCore '(("1") ("2") ("3")))
页: [1]
查看完整版本: member wcmatch某种程序上相互替代