乱数に関して (ID:146500)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Dim rn As Random = New Random() If rn.NextDouble() > 0.4 Then snowlocation.Add(New Point(rn.Next(PictureBox1.Width), -12)) snowsize.Add(rn.Next(4, 11)) 著作権に抵触するのですべてのコードは掲載できかねるのですが、 上のコードで rn.NextDouble() > 0.4は、乱数が0.4以上ならば と解釈できるのですが、 なぜ、この条件が必要なのか理解ができかねています。 少ない情報から読み取っていただけたら有り難いです