【質問】 ASP.NETスレ 【議論】

[0076 age 03/02/03 13:19 ID:PAD4T5eQ]

>>75

乱数を使う前に乱数を発生させる基底値(シード)をRandomize()で設定すればいいと思います。
Dim k As Integer
Dim sRnd As String
Randomize()
For k = 1 To 7
　　sRnd = sRnd & CInt(Int(Rnd() * 10))
Next