Try this, assuming your data can be a string;
Dim arData() As String
Dim ds As New DataSet
' Fill your dataset in your own way here
ReDim arData(ds.Tables(0).Rows.Count)
For intCounter As Integer = 0 To ds.Tables(0).Rows.Count - 1
arData(intCounter) = ds.Tables(0).Rows(intCounter).Item(0).ToString
Next
--
Gerry O'Brien
Visual Developer .NET MVP
Visual Basic
"Poppy" <pa**********@NOSPAMthemedialounge.com> wrote in message
news:e6**************@tk2msftngp13.phx.gbl...
Can someone point me to an example of populating an array from either a
dataset or a datareader ?
This .net stuff is killing me.