以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  这应该是Bug吧!菜单的行筛选,条件:包含“①”,会把包含1的都筛选出来  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=187296)

--  作者:kylin
--  发布时间:2023/7/6 20:36:00
--  这应该是Bug吧!菜单的行筛选,条件:包含“①”,会把包含1的都筛选出来
如上,记录都是文本行,包含数字、带圈序号和文字
[此贴子已经被作者于2023/7/6 20:37:51编辑过]

--  作者:有点蓝
--  发布时间:2023/7/6 21:29:00
--  
这个是vb.net自己的问题,下面代码显示是true

msgbox("①" = "1")

--  作者:kylin
--  发布时间:2023/7/6 21:40:00
--  
图片点击可在新窗口打开查看
--  作者:chen37280600
--  发布时间:2023/7/7 11:07:00
--  
这么简单的问题,直接问chatgpt啦

If "①"c <> "1"c Then
   Output.Show("不同")
End If


图片点击可在新窗口打开查看此主题相关图片如下:2.jpg
图片点击可在新窗口打开查看


图片点击可在新窗口打开查看此主题相关图片如下:3.jpg
图片点击可在新窗口打开查看


--  作者:y2287958
--  发布时间:2023/7/18 11:47:00
--  
回到正题,如何把包含“①”的记录筛选出来?
[此贴子已经被作者于2023/7/18 11:50:51编辑过]

--  作者:有点蓝
--  发布时间:2023/7/18 12:05:00
--  
没有办法。不要使用筛选,改为使用加载datatable.loadfilter这种
--  作者:y2287958
--  发布时间:2023/7/18 15:01:00
--  
按照您的思路,变通一下可以达到效果。

Dim sql命令 As New SQLCommand
sql命令.CommandText = "s elect [_Identify] from {表B} where 第四列=\'①\'"
Dim 临时表 As DataTable = sql命令.ExecuteReader
Dim lst As List(Of String) = 临时表.GetValues("_Identify")
Tables("表B").Filter = "[_Identify] in (" & String.Join(",", lst) & ")"
[此贴子已经被作者于2023/7/18 15:01:24编辑过]