sql数据库表如图：

现在，我在vb程序里想查询scll表中，查询符合两个条件（scll_scph和scll_wlbh满足条件）结果（输出scll_scjhd）然后将scjhd的多个值交给一个字符串，便于在textbox中引用，多个结果用，号隔开，并去掉重复值；
比如查询WL004/20200202，应该输出“JH20051227002，JH20051227003”
谁帮我解答一下，不胜感激！
rs22.Open "select * from tb_SCGL_scll where scll_wlmc = '" + Cbx_Field.Text + "' and scll_scph= '" + Txt_Key.Text + "'", cnn, adOpenKeyset
                        If rs22.RecordCount > 0 Then
                        For I = 0 To rs22.RecordCount - 1
                        LLL = rs22.Fields("scll_scjhd")
                        rs22.MoveNext
                        Next I
                        End If
                        rs22.Close
输出结果只有一个，另一个如何同时显示？LLL=JH20051227003，如何让LLL=JH20051227002，JH20051227003谢谢

                       LLL=""
                        For I = 0 To rs22.RecordCount - 1
                        LLL = LLL & rs22.Fields("scll_scjhd") & ","
                        rs22.MoveNext
                        Next I
                        LLL=left(LLL,len(LLL)-1)

你这个查询语句无法去掉重复值.这样写应该行：
rs22.Open "select scll_scjhd from tb_SCGL_scll where scll_wlmc = '" + Cbx_Field.Text + "' and scll_scph= '" + Txt_Key.Text + "' group by scll_scjhd", cnn, adOpenKeyset

感谢，非常感谢

[quote]以下是引用wmf2014在2020-3-5 20:18:17的发言：

                       LLL=""
                        For I = 0 To rs22.RecordCount - 1
                        LLL = LLL & rs22.Fields("scll_scjhd") & ","
                        rs22.MoveNext
                        Next I
                        LLL=left(LLL,len(LLL)-1)

你这个查询语句无法去掉重复值.这样写应该行：
rs22.Open "select scll_scjhd from tb_SCGL_scll where scll_wlmc = '" + Cbx_Field.Text + "' and scll_scph= '" + Txt_Key.Text + "' group by scll_scjhd", cnn, adOpenKeyset
[/quot
我还想问问老师：如果我想调用这两个记录号码，再去数据库继续查询，如何才能调取lll的两个值呢？谢谢