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 )
回复

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

还是没按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
