如何創建一個每次都返回不同值的隨機函數？

Question

我想寫一個隨機函數，返回一個隨機數，它不同於它返回的最後5個不同的數字。

我在Excel VBA中使用

非常simular代碼：

Function Rand(ByVal Low As Long, ByVal High As Long) As Long 
Randomize 
    Num3 = Num2 
    Num2 = Num1 
    Rand = Int((High - Low + 1) * Rnd) + Low 
    Num1 = Rand 

Do While Num1 = Num2 Or Num1 = Num3 Or Sheets(Csheet).Cells(Num1, 3) > 20 

     Rand = Int((High - Low + 1) * Rnd) + Low 
    Num1 = Rand 
    Loop 
End Function 

數量也需要檢查，在希伯來書[I] .Known字是假的。 我想這一個：

private int Rand(int Min, int Max) 
     { 
      int i; 
      int x = 0; 
      Random rnd = new Random(); 
      oldNum[3] = oldNum[2]; 
      oldNum[2] = oldNum[1]; 
      oldNum[1] = oldNum[0]; 
      do 
      { 

       i = rnd.Next(Min, Max); 
       x++; 
      } 
      while (Heb[i].Known==false && x<10000 && oldNum.Contains(i)); 
      oldNum[0] = i; 
      return i; 

     } 

儘管如此，它似乎doesen't合作過好...返回每次0。

Min和Max是在它從randomises列表的區域（應爲1之間-30） 希伯來是列表中的項目的數目（約500 - 1000項） 我初始化oldNum用：

int[] oldNum = new int[3]; 

Answer 1

這聽起來像你需要一個Queue！

Random rng = new Random(); 
Queue<int> queue = new Queue<int>(); 

private int Rand(int min, int max) 
{ 
    int r; 

    while(queue.Contains(r = rng.Next(min, max))); 

    queue.Enqueue(r); 

    if(queue.Count > 5) queue.Dequeue(); 

    return r; 
}