Erik Janson Vieira Coelho

Boa tarde Pessoa, Sou novo em programação e no Forum e gostaria de uma ajuda dos senhores. Tenho um projeto em que estou utilizando a coleção List(of string) da seguinte forma. Tenho uma Classe chamada Pessoas com o código: Public Class Pessoas Public Property Codigo() as Integer Public Property Nome() as String Public Property Nascimento() as DateTime Public Property Endereco() as String End Class Para preencher a lista uso uma Function com o seguinte código: Private Function PreencheLista() As List(Of Pessoa) Dim Lista As New List(Of Estudante)() From { _ New Pessoa() With { _ .Codigo = 1, _ .Nome = "Joaquim Jonas", _ .Nascimento = Convert.ToDateTime("11-08-1985") _ .Endereco = "Rua Qualquer, 100", _ }, _ New Pessoa() With { _ .Codigo = 2, _ .Nome = "Manuelina Pereira", _ .Nascimento = Convert.ToDateTime("23-04-1962") _ .Endereco = "Rua N, 20", _ }, _ New Pessoa() With { _ .Codigo = 3, _ .Nome = "Adolfo Alberto", _ .Nascimento = Convert.ToDateTime("01-02-1990") _ .Endereco = "Rua ndd, 50", _ } _ } Return Lista End Function Até aqui tudo bem. O problema é que eu preciso preencher a lista com os registro de uma tabela de meu banco. Aí que começa o meu problema, não sei como adaptar a função PreencheLista de forma que a lista seja preenchida com os registros do banco. Alguém pode me ajudar?