Something like this:

VB Code:
  1. ' Create the arrays
  2.         Dim this As New ArrayList
  3.         Dim arrRand As New ArrayList
  4.  
  5.         ' Fill the base array
  6.         For i As Integer = 0 To 9
  7.             this.Add(i)
  8.         Next
  9.  
  10.         Dim rand As New Random
  11.  
  12.         'Randomly remove items from the base array and add them to our random array
  13.         For j As Integer = 0 To 9
  14.             Dim item As Integer
  15.             item = rand.Next(0, this.Count - 1)
  16.             arrRand.Add(this(item))
  17.             this.RemoveAt(item)
  18.         Next
  19.  
  20.  
  21.         'Check the output to see that it is random
  22.         Dim sb As New StringBuilder
  23.         For i As Integer = 0 To 9
  24.             sb.Append(arrRand.Item(i))
  25.         Next
  26.  
  27.         MsgBox(sb.ToString())