Array Fill

[Tom]

Trying to fill a 2 dimensional array with fields from a dataset. Here's the
code:

Using rdr As DataTableReader = Me.ScoresDataSe t.CreateDataRea der()
Dim intDateOrdinal, intDiffOrdinal As Integer

Dim lng As Long = 0

Dim arDate() As String

intDateOrdinal = rdr.GetOrdinal( "date")

intDiffOrdinal = rdr.GetOrdinal( "Differenti al")

While rdr.Read()

'''''''''What goes here???????

End While

End Using

Any help is appreciated?

Thanks Tom

[Tom]

Re: Array Fill

Correction:

Dim arDate() As String
should be
Dim arDate(,) As String

"Tom" <tgilmer@Remove Thisadelphia.ne twrote in message
news:uqa6mA%23D HHA.3228@TK2MSF TNGP03.phx.gbl. ..

Trying to fill a 2 dimensional array with fields from a dataset. Here's
the code:
>
Using rdr As DataTableReader = Me.ScoresDataSe t.CreateDataRea der()
Dim intDateOrdinal, intDiffOrdinal As Integer
>
Dim lng As Long = 0
>
Dim arDate() As String
>
intDateOrdinal = rdr.GetOrdinal( "date")
>
intDiffOrdinal = rdr.GetOrdinal( "Differenti al")
>
While rdr.Read()
>
'''''''''What goes here???????
>
End While
>
End Using
>
Any help is appreciated?
>
Thanks Tom
>
>