[求助]请教randomize()的位置问题
Module Module1
Sub Main()
Dim x, y As Integer
While x = 0
Randomize()
y = Int(Rnd() * 1000 + 1)
If y Mod 7 = 0 Then x = 1
End While
Console.WriteLine(y)
Console.ReadLine()
End Sub
End Module
Module Module2
Sub Main()
Dim x, y As Integer
Randomize()
While x = 0
y = Int(Rnd() * 1000 + 1)
If y Mod 7 = 0 Then x = 1
End While
Console.WriteLine(y)
Console.ReadLine()
End Sub
End Module
请问这两个程序里的Randomize()这个函数的位置有区别吗？大侠讲讲哦
