乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 84|回复: 5

[编程交流] 在列表中搜索字符串

[复制链接]

2

主题

5

帖子

3

银币

初来乍到

Rank: 1

铜币
10
发表于 2022-7-6 06:21:53 | 显示全部楼层 |阅读模式
大家好,
 
 
我想用lisp搜索列表中的字符串,任何人都可以帮我。
 
ex(setq a(列表“1”“2”“3”))
现在我想在列表中搜索“2”。
 
非常感谢。
回复

使用道具 举报

2

主题

5

帖子

3

银币

初来乍到

Rank: 1

铜币
10
发表于 2022-7-6 06:43:55 | 显示全部楼层
只需将列表和搜索字符串传递给函数
 
前任:
 
(定义c:测试(/a是)
(setq a(列表“1”“2”“3”))
(setq yes(搜索字符串a“2”))
(如果(=是t)
(提示“找到”)
(提示“未找到”)
)
)
 
 
 
(defun searchstring(searchlist search/sealen sea anwser str)
(setq sealen(长度搜索列表))
(setq sea 0)
(setq anwser nil)
(虽然(
(setq str(第n个sea搜索列表))
(if(=(strcase search)(strcase str))
(程序
(setq anwser t)
)
)
(如果(=anwser t)
(setq sealen)
)
(setq海(+1海))
)
anwser公司
)
回复

使用道具 举报

63

主题

6297

帖子

6283

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
358
发表于 2022-7-6 06:50:26 | 显示全部楼层
如果在具有成员函数的列表中找到某个成员,则可以检查该成员。
 
例如
 
  1. (setq a (list "1" "2" "3"))
  2. (member "2" a)
回复

使用道具 举报

4

主题

2143

帖子

2197

银币

限制会员

铜币
-24
发表于 2022-7-6 07:00:32 | 显示全部楼层
请阅读代码发布指南并编辑您的帖子,将代码包含在代码标签中。
回复

使用道具 举报

2

主题

5

帖子

3

银币

初来乍到

Rank: 1

铜币
10
发表于 2022-7-6 07:14:48 | 显示全部楼层
谢谢你的回复。
回复

使用道具 举报

63

主题

6297

帖子

6283

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
358
发表于 2022-7-6 07:30:47 | 显示全部楼层
 
不客气。
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-10 18:45 , Processed in 0.860934 second(s), 64 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表