运行结果都是一样的随机数。 请问怎么改下 使得数组存储的是不同随机数啊，菜鸟在线等高手指点
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim arrData(9, 9) As Double

        Dim rand As New Random
        
        For i As Integer = 0 To 9
            For j As Integer = 0 To 9

                arrData(i, j) = rand.NextDouble()


            Next
        Next


        For Each strnNum As String In arrData

            For intI = 0 To 9

                For intJ = 0 To 9
                    Console.Write("arrdata[" + intI.ToString + " " + intJ.ToString + "] =" & strnNum)
                Next
                Console.WriteLine()
            Next
        Next

    End Sub
End Class

用 Randomize() 和 Rnd()  产生随机数
例如  Randomize()
      TextBox1.Text = Rnd() 或 TextBox1.Text = Rnd(Date.Now.Second)

Dim arrData(9, 9) As Double

        Dim rand As New Random

        For i As Integer = 0 To 9
            For j As Integer = 0 To 9

                arrData(i, j) = rand.NextDouble()


            Next
        Next


        For intI As Integer = 0 To 9

            For intJ As Integer = 0 To 9
                Me.TextBox1.Text += arrData(intI, intJ).ToString()
            Next

        Next