VB6.0随机生成一个数问题

Question

如果要随机生成1个数字S，这个数只能是2.4.8.16.32.64中的一个，并且有6个变量c2.c4.c8.c16.c32.c64分别规定了生成2.4.8.16.32.64的概率（百分比）（0~100，0代表不会生成该数字，100代表一定生成该数字），若概率总和小于100%，则有可能不生成数字。怎样写代码才能按规定的概率生成数字呢？

Answer 1

先把生成的概率变量加起来，如果小于100，则变成100.然后按100的随机数生成，比如：1.2.3.4.5.6的概率，生成的数在1-1（概率1），显示第一个数，如果是2-3（概率2），显示第二个数，如果是4-6（概率3），显示第三个数...

Answer 2

这个简单，只要知道概率，先生成0～1之间的随机数，只要概率符合，就把相应的数赋给相应的变量。如果概率为1，就直接添加进去就行了。