| 投稿日 | ： 2006/04/25(Tue) 10:03 |
| 投稿者 | ： つぼちゃん |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： ランダム関数について |
ランダム関数についてですが、プログラムを実行してからの1回目の結果が
毎回同じになってしまいます。
Private Sub Command1_Click()
Dim i As Integer
For i = 0 To 5
Text1(i).Text = Int(43 * Rnd + 1)
Next
End Sub
を実行すると、プログラムを実行してからの1回目の結果が毎回
31,23,25,13,13,34 となってしまいます。
同様に2回目は必ず
1,33,36,31,2,18
となってしまいます。
こういうものなのでしょうか。