专家坐堂-[求助]SQL查询相关问题Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]SQL查询相关问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=194358)

--  作者：JackLi
--  发布时间：2024/12/2 16:46:00
--  [求助]SQL查询相关问题
为什么没有按照in条件里面的数据展示数据？
请问怎么才能按照in里面的条件展示数据？

此主题相关图片如下：snip点击浏览该文件

--  作者：有点蓝
--  发布时间：2024/12/2 16:47:00
--
上传图片的方法：http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=78

--  作者：JackLi
--  发布时间：2024/12/2 16:52:00
--  [求助]图片上传
图片上传1

此主题相关图片如下：snipaste_2024-12-02_16-41-53.png

图片上传2

此主题相关图片如下：aaaaaaaaaaaaaaaaa.png

--  作者：有点蓝
--  发布时间：2024/12/2 17:12:00
--

Dim Multi As String = tb1.Value
Multi = Multi.Replace(vbcr, "").Replace(vblf, "\',\'")
Dim Values() As String = Nothing
Dim sql_str As String = "select * from 排序测试表 where 第一列 in (\'" & Multi & "\')"
msgbox(sql_str )

--  作者：JackLi
--  发布时间：2024/12/2 17:17:00
--  [求助]回复
回复

此主题相关图片如下：snipaste_2024-12-02_17-15-52.png

--  作者：有点蓝
--  发布时间：2024/12/2 17:19:00
--
Multi = Multi.Replace(vbcr, "").Trim(vblf).Replace(vblf, "\',\'")

--  作者：JackLi
--  发布时间：2024/12/2 17:22:00
--  [求助]回复
回复

此主题相关图片如下：snipaste_2024-12-02_17-21-07.png

--  作者：有点蓝
--  发布时间：2024/12/2 17:30:00
--
sql没有问题。测试还有什么问题？

--  作者：JackLi
--  发布时间：2024/12/2 17:32:00
--  [求助]回复
还是没按in里面的顺序

此主题相关图片如下：snipaste_2024-12-02_17-30-54.png

此主题相关图片如下：snipaste_2024-12-02_17-31-03.png

代码：

此主题相关图片如下：snipaste_2024-12-02_17-32-05.png

--  作者：有点蓝
--  发布时间：2024/12/2 17:38:00
--
这个只是查询数据，和排序没有关系。排序另外参考：http://www.foxtable.com/webhelp/topics/0451.htm