VB .NET - Conexão Utilizando o SQL Express

Imports System.Data.SqlClient

    Dim dt As DataTable

    Dim da As SqlDataAdapter

    Dim ds As DataSet

    Dim conBD As SqlConnection

    Dim cn As String = "Data Source=.\SQLEXPRESS;AttachDbFilename=C:\Northwind\Northwind.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True"

   

Dim sSQL As String = "Select * From Customers"

conBD = New SqlConnection(cn)

ds = New DataSet

'O SqlDataAdapter preenche (popula) o DataSet, permitindo inserir, atualizar, excluir registros da tabela

'Através do método Fill, preenche ou exibe os registros por exemplo em um grid, listbox

da = New SqlDataAdapter(sSQL, cn)

da.Fill(ds, "Customers")

dt = dsVendedor.Tables("Customers")

cn.Open()