Foxtable(狐表)用户栏目专家坐堂 → 实现按比例生成随机数的方法


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

主题:实现按比例生成随机数的方法

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


加好友 发短信
等级:超级版主 帖子:107772 积分:548205 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/4/26 13:39:00 [只看该作者]

把集合的项目随机取出来放到另外一个集合即可

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


加好友 发短信
等级:幼狐 帖子:108 积分:1044 威望:0 精华:0 注册:2018/11/21 18:11:00
  发帖心情 Post By:2019/4/26 14:20:00 [只看该作者]

你好用哪个代码实现?

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


加好友 发短信
等级:超级版主 帖子:107772 积分:548205 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/4/26 14:36:00 [只看该作者]

Dim lst1 As List(of String) = xxx
Dim lst2 As new List(of String)
Do While lst1.Count > 1 Then
    Dim i As Integer = Rand.Next(0,lst1.Count)
    lst2.Add(lst1(i))
    lst1(i).RemoveAt(i)
Loop
lst2.AddRange(lst1)

 回到顶部
总数 13 上一页 1 2