以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]查询结果合并  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=132219)

--  作者:sunion
--  发布时间:2019/3/17 11:19:00
--  [求助]查询结果合并
请问各位大神,我要将下列结果合并,也就是S等于s1、S2筛选后合并的结果,怎么修改?

Dim s1 As  String
s1 = DataTables("学生互评表").SQLGetComboListString("标签一","[学号] = \'" & xuehao.text & "\' And [姓名] = \'" & name.text & "\' And [学年] = \'" & xuen.value & "\'","操作时间")

Dim s2 As String
s2 = DataTables("学生互评表").SQLGetComboListString("标签二","[学号] = \'" & xuehao.text & "\' And [姓名] = \'" & name.text & "\' And [学年] = \'" & xuen.value & "\'","操作时间")

Dim s As  String
s = ?

--  作者:2900819580
--  发布时间:2019/3/17 11:22:00
--  
s = S1 & "|" & s2 或者 s = S1 &  S2
 
你测试一下
 

--  作者:sunion
--  发布时间:2019/3/17 11:40:00
--  
我需要的是这个结果
代码s = S1 & "|" & s2 或者 s = S1 &  S2好像达不到要求,不知道我是不是哪里弄错了,请指点一二,谢谢
Dim s1 As  String = {"中国","美国","日本","俄罗斯"}
Dim s2 As  String = {"德国","英国"}
Dim s As  String {"中国","美国","日本","俄罗斯","德国","英国"}

--  作者:sunion
--  发布时间:2019/3/17 11:40:00
--  
我需要的是这个结果
代码s = S1 & "|" & s2 或者 s = S1 &  S2好像达不到要求,不知道我是不是哪里弄错了,请指点一二,谢谢
Dim s1 As  String = {"中国","美国","日本","俄罗斯"}
Dim s2 As  String = {"德国","英国"}
Dim s As  String {"中国","美国","日本","俄罗斯","德国","英国"}

--  作者:有点蓝
--  发布时间:2019/3/18 9:21:00
--  
没看懂到底需要什么样的结果。如果要转换为数组,参考:

dim arr() as string = (S1 & "|" & s2).split("|")