[2005] why the integer value of random number is same?

[newpat]

Dim value As Integer = CInt(Int((9 * Rnd()) + 0))

it always give me the value = 6