[ssharma286]

I am trying to make a texas hold em game and it is of the utmost importance that my code generate a random number. But using a random number function that I always end up with a lot of the same numbers over and over again. Any ideas on how to make it "TRULY" random? My current code is below:

 Dim e As Integer
        Dim b As String
        e = Random(1, 57)
        For counter = 1 To e
            b = Random(1, 1000)
            b = b Mod 53

        Next
        If (b = 0) Then b = Random(1, 43)

and the function is....

Function Random(ByVal Lowerbound As Long, ByVal Upperbound As Long)
        Randomize()
        Random = Int(Rnd * Upperbound) + Lowerbound
    End Function

[smohd]

Why dont you use a build in random generator, like declare an instance of random and use it to give next number

[Btu]

just FYI, the random number generator in VB is "pseudo" random, and will never generate a truly random number.

[AdamSpeight2008]

There is more than one Random number source in VB.net.