Foxtable(狐表)用户栏目专家坐堂 → [求助]定义一个动态集合


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

主题:[求助]定义一个动态集合

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


加好友 发短信
等级:九尾狐 帖子:2202 积分:18130 威望:0 精华:0 注册:2011/11/26 20:21:00
[求助]定义一个动态集合  发帖心情 Post By:2021/7/7 15:19:00 [只看该作者]

准备做一个自定义函数。
dim x as string = args(0)  '这是一个字符串,可以有个,用分号隔开

想把字符串中的每一个元素,定义一个集合。比如x = "A1,A2,A3"

想随着这个列,扩展定义一个变动的集合组
如dim listA1,listA2,ListA3 as new list(of string) 

因为X有多少个是未知的,有2个就定义两个集合;有3个应定义三个

能不能行?

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


加好友 发短信
等级:狐神 帖子:4640 积分:33850 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2021/7/7 15:23:00 [只看该作者]

用字典

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


加好友 发短信
等级:九尾狐 帖子:2202 积分:18130 威望:0 精华:0 注册:2011/11/26 20:21:00
  发帖心情 Post By:2021/7/7 15:23:00 [只看该作者]

能说详细点吗

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


加好友 发短信
等级:狐神 帖子:4640 积分:33850 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2021/7/7 15:27:00 [只看该作者]

Dim ss As String = "a1,a2,a3"
Dim dic As New Dictionary(Of String, object)
For Each s As String In ss.Split(",")
    Dim lst As new List(of String)
    dic.add(s,lst)
Next

 回到顶部