Como consultar um banco de dados usando LINQ (Visual Basic)
O LINQ (Language-Integrated Query) facilita o acesso às informações do banco de dados e a execução de consultas.
O exemplo a seguir mostra como criar um novo aplicativo que executa consultas em um banco de dados do SQL Server.
Os exemplos neste tópico usam o banco de dados de exemplo Northwind. Se não tiver esta base de dados no computador de desenvolvimento, pode transferi-la a partir do Centro de Transferências da Microsoft. Para obter instruções, consulte Download de bancos de dados de exemplo.
Nota
Seu computador pode mostrar nomes ou locais diferentes para alguns dos elementos da interface do usuário do Visual Studio nas instruções a seguir. A edição do Visual Studio que você tem e as configurações que você usa determinam esses elementos. Para obter mais informações, consulte Personalizando o IDE.
Para criar uma conexão com um banco de dados
No Visual Studio, abra o Gerenciador de Banco de Dados do Gerenciador/de Servidores clicando em Gerenciador de Banco de Dados do Gerenciador/de Servidores no menu Exibir.
Clique com o botão direito do rato em Ligações de Dados no Explorador de Bases de Dados do Explorador/ de Servidores e, em seguida, clique em Adicionar Ligação.
Especifique uma conexão válida com o banco de dados de exemplo Northwind.
Para adicionar um projeto que contém um arquivo LINQ to SQL
No Visual Studio, no menu Arquivo , aponte para Novo e clique em Projeto. Selecione Visual Basic Windows Forms Application como o tipo de projeto.
No menu Projeto, clique em Adicionar Novo Item. Selecione o modelo de item LINQ to SQL Classes .
Dê o nome
northwind.dbml
ao ficheiro. Clique em Adicionar. O Object Relational Designer (O/R Designer) é aberto para o arquivo northwind.dbml.
Para adicionar tabelas à consulta ao O/R Designer
No Gerenciador de Bancos de Dados do Gerenciador/de Servidores, expanda a conexão com o banco de dados Northwind. Expanda a pasta Tabelas .
Se você tiver fechado o O/R Designer, poderá reabri-lo clicando duas vezes no arquivo northwind.dbml adicionado anteriormente.
Clique na tabela Clientes e arraste-a para o painel esquerdo do designer. Clique na tabela Pedidos e arraste-a para o painel esquerdo do designer.
O designer cria novos
Customer
eOrder
objetos para o seu projeto. Observe que o designer deteta automaticamente relações entre as tabelas e cria propriedades filho para objetos relacionados. Por exemplo, o IntelliSense mostrará que oCustomer
objeto tem umaOrders
propriedade para todos os pedidos relacionados a esse cliente.Salve as alterações e feche o designer.
Guarde o seu projeto.
Para adicionar código para consultar o banco de dados e exibir os resultados
Na caixa de ferramentas, arraste um DataGridView controle para o Windows Form padrão para seu projeto, Form1.
Clique duas vezes em Form1 para adicionar código ao
Load
evento do formulário.Quando você adicionou tabelas ao O/R Designer, o designer adicionou um DataContext objeto para seu projeto. Este objeto contém o código que você deve ter para acessar essas tabelas, além de objetos individuais e coleções para cada tabela. O DataContext objeto para seu projeto é nomeado com base no nome do seu arquivo .dbml. Para este projeto, o DataContext objeto é chamado
northwindDataContext
.Você pode criar uma instância do DataContext em seu código e consultar as tabelas especificadas pelo O/R Designer.
Adicione o seguinte código ao
Load
evento para consultar as tabelas que são expostas como propriedades do seu contexto de dados.Dim db As New northwindDataContext Dim londonCusts = From cust In db.Customers Where cust.City = "London" Select cust DataGridView1.DataSource = londonCusts
Pressione F5 para executar seu projeto e visualizar os resultados.
A seguir estão algumas consultas adicionais que você pode tentar:
Dim londonCustOrders = From cust In db.Customers, ord In cust.Orders Where cust.City = "London" Order By ord.OrderID Select cust.City, ord.OrderID, ord.OrderDate DataGridView1.DataSource = londonCustOrders
Dim custs = From cust In db.Customers Where cust.Country = "France" And (cust.CompanyName.StartsWith("F") Or cust.CompanyName.StartsWith("V")) Order By cust.CompanyName Select cust.CompanyName, cust.City DataGridView1.DataSource = custs