Как заполнить ArrayList данными столбца БД? - Visual Basic .NET

Формулировка задачи:

Подскажите как заполнить ArrayList столбцом из БД?

Dim i As Integer
          Dim rab As New ArrayList
        SqlCom = New OleDb.OleDbCommand("SELECT Табельный_номер FROM Рабочие", con)
        con.Open()
        SqlCom.ExecuteNonQuery()
        da = New OleDb.OleDbDataAdapter(SqlCom)
        da.Fill(DT)
        For i = 0 To rab.Count - 1
            rab.Add(DT.Rows(i))
        Next
        con.Close()

Решение задачи: «Как заполнить ArrayList данными столбца БД?»

textual
                            Листинг программы 
                        

                            Dim rab As New List(Of String)
SqlCom = New OleDb.OleDbCommand("SELECT Табельный_номер FROM Рабочие", con)
con.Open()
Using dataReader As OleDbDataReader = SqlCom.ExecuteReader()
    Do While dataReader.Read()
        rab.Add(dataReader.GetString(0))
    Loop
End Using
con.Close()
                        