[2005] Fastest way to change array

[dbasnett]

        Dim bigA(100000) As Integer, keyA(100000) As Integer
        Dim stopW As New Stopwatch, someRandom As New Random
        stopW.Reset() : stopW.Start()
        For x As Integer = 0 To bigA.Length - 1
            keyA(x) = someRandom.Next(1, Integer.MaxValue)
            bigA(x) = bigA(x) Xor keyA(x)
        Next
        stopW.Stop()
        Debug.WriteLine(stopW.ElapsedTicks.ToString)
        Debug.WriteLine(stopW.ElapsedMilliseconds.ToString)
        Stop

9 ms., in the debugger, on my 1.8Ghz laptop. <---Quantified