Foxtable(狐表)用户栏目专家坐堂 → 关于数组集合的提问!


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

主题:关于数组集合的提问!

帅哥哟,离线,有人找我吗?
gsnake
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:682 积分:5263 威望:0 精华:0 注册:2012/6/6 14:37:00
关于数组集合的提问!  发帖心情 Post By:2013/8/7 22:51:00 [显示全部帖子]

集合可以这样定义,及添加。

Dim Names As New List(Of String)
Names.Add( "
电视机")
Names.Add("
电冰箱")
Names.Add("
洗衣机")

数组集合这样定义

Dim Arys As List(Of String())

帮助里的添加 是 Arys = DataTables("订单").GetUniqueValues("", "客户","产品")

 

我不要这样,想向上面一样手工来添加数组集合,怎样做?


 回到顶部
帅哥哟,离线,有人找我吗?
gsnake
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:682 积分:5263 威望:0 精华:0 注册:2012/6/6 14:37:00
  发帖心情 Post By:2013/8/8 6:58:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:无标题.jpg
图片点击可在新窗口打开查看

 

谢谢!老师您测测看


 回到顶部
帅哥哟,离线,有人找我吗?
gsnake
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:682 积分:5263 威望:0 精华:0 注册:2012/6/6 14:37:00
  发帖心情 Post By:2013/8/8 20:34:00 [显示全部帖子]

 

Dim ary1() As String = {"1", "2", "3"}

dim ary2() as string = {"1", "2", "3"}

Dim arys As new List(Of String())       这里不加new,就出错!真是啊

arys.add(ary1)

arys.add(ary2)

 

 

 

Dim Arys As List(Of String())   这里不加new也行

Arys = DataTables("表A").GetUniqueValues("", "第一列","第二列")

'注意循环变量是字符型数组,所以类型是String(),而不是String
For
Each Ary As String() In Arys
    Output.Show(Ary(0) & "|" & Ary(1))
Next

 

 

Dim Arys As new List(Of String())      这里加new也行,不知为什么?难道就是VB的不规范?

Arys = DataTables("表A").GetUniqueValues("", "第一列","第二列")

'注意循环变量是字符型数组,所以类型是String(),而不是String

For Each Ary As String() In Arys

    Output.Show(Ary(0) & "|" & Ary(1))

Next

 

[此贴子已经被作者于2013-8-8 20:48:49编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
gsnake
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:682 积分:5263 威望:0 精华:0 注册:2012/6/6 14:37:00
  发帖心情 Post By:2013/8/8 20:52:00 [显示全部帖子]

我知道了,GetUniqueValues foxtable自己做的函数,里面有new的内存了

 回到顶部