vb随机生成1到100随机数 VB编程模拟抛硬币，生成N个随机数。大于0.5的代表正面。小于等于0.5的代表反面，统计正反面各多少次？

VB编程模拟抛硬币，生成N个随机数。大于0.5的代表正面。小于等于0.5的代表反面，统计正反面各多少次？

Private Sub Command1_uu2;Click（）dim I as integer，n as integer，num1 as integer，num2 as integer n=Val（InputBox（“please input the number of times to flip a coin:”）对于I=1 to n randomize t=rnd（），如果t> 0.5，则num1=num1，否则num2=num2 1 end if next print num1 print“负数为：”&num2end subnum1 is used要记录正数，num2用来记录负数，rnd（）是0到1之间的随机数，其他写为：int（（上界-下界1）*rnd下界）哈哈，VB初学者，笑一笑

vb随机生成1到100随机数 vb产生随机数公式 vb产生10到100的随机数

版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。