Llenar una matriz con un campo de una tabla

[jotaeva]

Podrían ayudarme para llenar una matriz con un campo de una tabla, por favor?
Trabajo con Visual Basic 2005 Express


El código base:

Código VB:

Me.con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & "c:\socios.mdb; Persist Security Info=False"
 con.Open()
vtda = New OleDbDataAdapter("Select nombre from inscritos where status= 1 ", con)
Dim oCB As OleDbCommandBuilder = New OleDbCommandBuilder(dta)
dst = New DataSet
dta.Fill(dst, "inscritos")
vActivos = Me.dst.Tables("inscritos").Rows.Count
 

De esta DB necesito llenar una matriz con el campo nombre quizá por medio de un Datareader pero sinceramente no sé cómo hacerlo.

Agradecería mucho su ayuda porque soy novato en esto. Gracias!!!

[jotaeva]

Encontré la solución con este sub: (La variable vDia viene de una clase)

Código Visual Basic:

Private Sub tbCargoSocios_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tbCargoSocios.Click
    'La BD ya está abierta....
    dtap = New OleDbDataAdapter("Select * from inscritos where dia=vDia", con)
    dst = New DataSet
    dtap.Fill(dst, "inscritos")
    vNumeroSocios = Me.dst.Tables("inscritos").Rows.Count
    Dim dtDataTable As DataTable = dst.Tables("inscritos")
    Dim numberArray(vNumeroSocios) As Integer
    Dim counter As Integer
    For counter = 0 To vNumeroSocios - 1 
      Dim dtrow As DataRow = dtDataTable.Rows(counter)
      numberArray(counter) = dtrow("nombre") 'ERROR
    Next
  End Sub
 

Sin embargo, en la línea 12 me da este error:

La conversión de la cadena "Carlos Castillo" en el tipo 'Integer' no es válida.

¿Me podrían ayuda?

Gracias

[jotaeva]

Por si le sirve a alguno, esta es la solución a mi problema en lugar del array:

Código Visual Basic:

Dim Cl_Nombres As New Collection
    For Each Dt_Row As DataRow In dst.Tables("inscritos").Rows
      Dim Dt_Nombre As String = Dt_Row.Item("nombre").ToString
      Cl_Nombres.Add(CObj(Dt_Nombre))
Next