Foxtable(狐表)用户栏目专家坐堂 → [讨论][求助]数组合并


  共有2080人关注过本帖树形打印复制链接

主题:[讨论][求助]数组合并

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110558 积分:562680 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/6/23 17:44:00 [显示全部帖子]

Dim aa() As String = {"1","2","3","4"}   
Dim bb() As String = {"5","6","7","8"}   
Dim cc(aa.Length - 1) As String

For i As Integer = 0 To aa.Length - 1
    cc(i) = aa(i) & bb(i)
Next

For i As Integer = 0 To cc.Length - 1
    Output.Show(cc(i))
Next

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110558 积分:562680 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/6/23 18:43:00 [显示全部帖子]

Dim aa() As String = {"1","2","3","4"}   
Dim bb() As String = {"5","6","7","8"}   
Dim lst As new List(of String)

For i As Integer = 0 To aa.Length - 1
    lst.Add(aa(i) )
Next

For i As Integer = 0 To bb.Length - 1
    lst.Add(bb(i) )
Next
Dim cc() As String = lst.ToArray()
For i As Integer = 0 To cc.Length - 1
    Output.Show(cc(i))
Next

 回到顶部