控制随机机率问题!?

gogood2008 2014-05-25 01:43:55
现在有8个人员名称:
黄一明 ,黄二明 ,黄三明,黄四明,黄五明,黄六明,黄七明,黄八明

将要进行抽奖 ,想控制他们被抽中的机率。

比如指定 黄一明 ,黄二明 有20%的机会被抽中。

黄三明,黄四明,黄五明 有30%机会被抽中。

黄六明,黄七明,黄八明 有50%机会被抽中。

请问用VB 脚本 怎样实现呀,什么思路呢?

请大兄们 详说说和写下代码 小弟感激万分!!!!
...全文
114 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
Dogfish 2014-05-25
  • 打赏
  • 举报
回复
就分为100份。 个位数是1和6的,在黄一明 ,黄二明里再选一个 个位数是2、3和7的,在黄三明,黄四明,黄五明里再选一个 个位数是4,5,8,9和0的, 黄六明,黄七明,黄八明 里再选一个
什么都不能 2014-05-25
  • 打赏
  • 举报
回复
引用 2 楼 gogood2008 的回复:
兄弟是什么 恩路能详细解析下吗?
每个比例的分组之和为100%,所以设置10个元素的数组存储,按比例安排分组在数组中的比例,随机可得出每个分组的比例,每个分组中的元素占和分组相同的比例,所以只能随机出现其1,。 你要看下这个是否你要的结果,这个只是粗略的模型,可以根据模型扩展思路。
gogood2008 2014-05-25
  • 打赏
  • 举报
回复
兄弟是什么 恩路能详细解析下吗?
什么都不能 2014-05-25
  • 打赏
  • 举报
回复
2 dim array prizePool = new array(new array(1,2), new array(1,2), new array(3,4,5), new array(3,4,5), new array(3,4,5), new array(6,7,8), new array(6,7,8), new array(6,7,8), new array(6,7,8), new array(6,7,8)) randomize tmp = prizePool(cint(rnd() * 9)) result = tmp(cint(rnd()*ubound(tmp) ))

28,391

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧