Random numbers, but not the same. [GIVEN UP]

[martw]

OK, I got this code:

Dim p1 As Integer = RandomNo.Next(0, 4)
    Dim p2 As Integer = RandomNo.Next(0, 4)
    Dim p3 As Integer = RandomNo.Next(0, 4)
    Dim p4 As Integer = RandomNo.Next(0, 4)
    Dim p5 As Integer = RandomNo.Next(0, 4)

What I want to do, is generate a random number between 0 and 4, yet make none of the choices the same. So what can I do to exclude the numbers from the previous P's as the numbers are generated? This is outside of the Event Procedures so I can't use any Loops to check and corect it. I haven't the slightest clue on how to go about this. Any help appreciated.