- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 怎样筛选出一个字符串列中包含某个字符的行？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=169871)
-- 发布时间：2021/7/4 21:35:00
-- 怎样筛选出一个字符串列中包含某个字符的行？
此主题相关图片如下：屏幕截图 2021-07-04 212949.png
各位老师好！
请问我有一个如图片中的表，我想筛选出这个列中的条辩包含某一组症状的条辩，比如发热，那么条辩中有发热的都可以筛选出来，又比如发热与恶寒，那么条辩中有发热和恶寒的条辩能筛选出来，不知怎样才能做到？
[此贴子已经被作者于2021/7/4 21:35:40编辑过]
-- 发布时间：2021/7/4 21:38:00
--
看like的用法：http://www.foxtable.com/webhelp/topics/1647.htm
Tables("订单").Filter = "[消息列] like \'%发热%\'"
-- 发布时间：2021/7/5 10:02:00
--
根据蓝老师的解答，我做了个示例。实现了“又比如发热与恶寒，那么条辩中有发热和恶寒的条辩能筛选出来”。
示例的网址是：http://159.75.97.190:83/
主要代码如下：
Dim str As String,Value As String = InputGjc
Dim sps() As Char = {"|","/","\\"," ",StrToWide(" ")}
Dim Names() As String = Value.Split(sps)
For Each name As String In Names
If name.trim(" ",StrToWide(" "))>"" Then
If str>"" Then
str=str & " and "
End If
str=str & cexp(" [条辨] Like \'%{0}%\'",name)
End If
Next
Dim dtr As List(of DataRow) =DataTables("方库").SQLSelect( str,"","编号")
-- 发布时间：2021/7/5 20:20:00
-- 谢谢各位
谢谢！
-- 发布时间：2021/7/5 20:48:00
-- 有点小问题
为什么我用变量代替进去就不行了？不用变量却可以
-- 发布时间：2021/7/5 21:24:00
--
贴出具体代码，用代码说话
-- 发布时间：2021/7/6 21:08:00
-- 看一下为什么？
dim str as string ="恶寒"
Tables("订单").Filter = "[消息列] like \'%str%\'"
这样就不行了，为什么？
-- 发布时间：2021/7/6 21:16:00
--
先看几遍：http://www.foxtable.com/webhelp/topics/1284.htm
Tables("订单").Filter = "[消息列] like \'%" & str & "%\'"