.NET(へたれな)コネタ　乱数生成

IT 
    Private Function AutoSeedRandoms()
        Thread.Sleep(1)
        Dim autoRand As New Random
        AutoSeedRandoms = RunIntNDoubleRandoms(autoRand)
    End Function
    Private Function RunIntNDoubleRandoms(ByVal randObj As Random)
        ' Generate the first six random integers.
        RunIntNDoubleRandoms = randObj.Next()
    End Function

Random クラス
このときの「Thread.Sleep(1)」って何のためにやっているのでせうか？
連続呼び出しでも異なるTimer値を乱数シードに利用できるためですか