Introduzione a LINQ in Visual Basic

Language-Integrated Query (LINQ) aggiunge funzionalità di query a Visual Basic e fornisce semplici e potenti funzionalità da utilizzare con qualsiasi tipo di dati.Anziché inviare una query a un database da elaborare, o utilizzare sintassi di query differenti per ogni tipo di dati da ricercare, LINQ introduce le query come parti del linguaggio Visual Basic.Utilizza una sintassi unificata indipendentemente dal tipo di dati.

LINQ consente di eseguire query su dati in un database SQL Server, XML, matrici e raccolte in memoria, dataset ADO.NET o qualsiasi altra origine dati remota o locale che supporta LINQ.È possibile fare tutto per questo con i comuni elementi del linguaggio Visual Basic.Poiché le query sono scritte in Visual Basic, i risultati vengono restituiti come oggetti fortemente tipizzati.Questi oggetti supportano IntelliSense, il che consente di scrivere il codice più velocemente e di individuare errori nelle query in fase di compilazione anziché in fase di esecuzione.Le query LINQ possono essere utilizzate come origine di query aggiuntive per perfezionare i risultati.Possono anche venire associate a controlli in modo che gli utenti possano facilmente visualizzare e modificare i risultati della query.

Nell'esempio di codice seguente viene illustrata una query LINQ che restituisce un elenco di clienti da una raccolta e li raggruppa in base alla località.

' Obtain a list of customers.
Dim customers As List(Of Customer) = GetCustomers()

' Return customers that are grouped based on country.
Dim countries = From cust In customers
                Order By cust.Country, cust.City
                Group By CountryName = cust.Country
                Into CustomersInCountry = Group, Count()
                Order By CountryName

' Output the results.
For Each country In countries
    Debug.WriteLine(country.CountryName & " count=" & country.Count)

    For Each customer In country.CustomersInCountry
        Debug.WriteLine("   " & customer.CompanyName & "  " & customer.City)
    Next
Next

' Output:
'   Canada count=2
'      Contoso, Ltd  Halifax
'      Fabrikam, Inc.  Vancouver
'   United States count=1
'      Margie's Travel  Redmond

In questo argomento, vengono fornite informazioni relative alle aree seguenti:

• Eseguire gli esempi

• Provider LINQ

• Struttura di una query LINQ

• Operatori di query LINQ di Visual Basic

• Connessione a un database utilizzando LINQ to SQL

• Funzionalità di Visual Basic che supportano LINQ

• Esecuzione query posticipata e immediata

• XML in Visual Basic

• Risorse correlate

• Procedure e procedure dettagliate

Eseguire gli esempi

Per eseguire gli esempi nell'introduzione e alla struttura nella sezione di una query LINQ", incluso il codice seguente, che restituisce gli elenchi customers e orders.

' Return a list of customers.
Private Function GetCustomers() As List(Of Customer)
    Return New List(Of Customer) From
        {
            New Customer With {.CustomerID = 1, .CompanyName = "Contoso, Ltd", .City = "Halifax", .Country = "Canada"},
            New Customer With {.CustomerID = 2, .CompanyName = "Margie's Travel", .City = "Redmond", .Country = "United States"},
            New Customer With {.CustomerID = 3, .CompanyName = "Fabrikam, Inc.", .City = "Vancouver", .Country = "Canada"}
        }
End Function

' Return a list of orders.
Private Function GetOrders() As List(Of Order)
    Return New List(Of Order) From
        {
            New Order With {.CustomerID = 1, .Amount = "200.00"},
            New Order With {.CustomerID = 3, .Amount = "600.00"},
            New Order With {.CustomerID = 1, .Amount = "300.00"},
            New Order With {.CustomerID = 2, .Amount = "100.00"},
            New Order With {.CustomerID = 3, .Amount = "800.00"}
        }
End Function

' Customer Class.
Private Class Customer
    Public Property CustomerID As Integer
    Public Property CompanyName As String
    Public Property City As String
    Public Property Country As String
End Class

' Order Class.
Private Class Order
    Public Property CustomerID As Integer
    Public Property Amount As Decimal
End Class

Provider LINQ

Un provider LINQ Visual Basic esegue il mapping di query LINQ sull'origine dati su cui eseguire una query.Quando si scrive una query LINQ, il provider prende tale query e la traduce in comandi che l'origine dati sarà in grado di eseguire.Il provider converte anche i dati dall'origine negli oggetti che costituiscono il risultato della query.Infine, converte gli oggetti in dati quando si inviano aggiornamenti all'origine dati.

Visual Basic include i seguenti provider LINQ:

Struttura di una query LINQ

Una query LINQ, spesso definita espressione di queryè costituita da una combinazione di clausole di query che identificano le origini dati e le variabili di iterazione per la query.Un'espressione di query può includere anche istruzioni per ordinare, filtrare, raggruppare e unire, o eseguire calcoli sui dati di origine.La sintassi delle espressioni di query è simile alla sintassi SQL; pertanto, gran parte della sintassi risulterà familiare.

Un'espressione di query inizia con la clausola From.Questa clausola identifica i dati di origine per una query e le variabili utilizzate per fare riferimento a ogni elemento dell'insieme di origine.Queste variabili sono denominate variabili di intervallo o variabili di iterazione.La clausola From è obbligatoria per una query, tranne che per le query Aggregate in cui la clausola From è facoltativa.Dopo che l'ambito e origine della query sono identificate nelle clausole From o Aggregate, è possibile includere qualsiasi combinazione di clausole query per perfezionare la query.Per dettagli sulle clausole query, vedere Operatori di query di Visual Basic più avanti in questo argomento.Ad esempio, nella query seguente viene identificata una raccolta di origine di dati cliente come variabile customers e una variabile di iterazione denominata cust.

Dim customers = GetCustomers()

Dim queryResults = From cust In customers

For Each result In queryResults
    Debug.WriteLine(result.CompanyName & "  " & result.Country)
Next

' Output:
'   Contoso, Ltd  Canada
'   Margie's Travel  United States
'   Fabrikam, Inc.  Canada

In questo esempio viene illustrata una query valida; tuttavia, la query diviene molto più efficace quando si aggiungono altre clausole di query per perfezionare il risultato.Ad esempio, è possibile aggiungere una clausola Where per filtrare il risultato per uno o più valori.Le espressioni di query consistono in una sola riga di codice; è possibile aggiungere solo clausole aggiuntive alla fine della query.È possibile suddividere una query su più righe del testo per migliorarne la leggibilità utilizzando il carattere di continuazione della riga: segno di sottolineatura (_).Nell'esempio di codice seguente viene illustrato un esempio di query che include una clausola Where.

Dim queryResults = From cust In customers
                   Where cust.Country = "Canada"

Un'altra efficace clausola di query è Select, che consente di restituire dall'origine dati solo i campi selezionati.Le query LINQ restituiscono raccolte enumerabili di oggetti fortemente tipizzati.Una query può restituire una raccolta di tipi anonimi o tipi denominati.È possibile utilizzare la clausola Select per restituire solo un unico campo dall'origine dati.In questo caso, il tipo della raccolta restituita è il tipo di quell'unico campo.È possibile utilizzare la clausola Select per restituire più campi dall'origine dati.In questo caso, il tipo della raccolta restituita è un nuovo tipo anonimo.È anche possibile far corrispondere i campi restituiti dalla query ai campi di un tipo denominato specificato.Nell'esempio di codice seguente viene illustrata un'espressione di query che restituisce una raccolta di tipi anonimi che hanno membri popolati con dati dai campi selezionati dell'origine dati.

Dim queryResults = From cust In customers
               Where cust.Country = "Canada"
               Select cust.CompanyName, cust.Country

Le query LINQ possono essere utilizzate anche per combinare più origini di dati e restituire un unico risultato.Questa operazione può essere eseguita con una o più clausole From o utilizzando le clausole query Join o Group Join.Nell'esempio di codice seguente viene illustrata un'espressione di query che combina dati del cliente e dell'ordine e restituisce una raccolta di tipi anonimi che contengono dati del cliente e dell'ordine.

Dim customers = GetCustomers()
Dim orders = GetOrders()

Dim queryResults = From cust In customers, ord In orders
           Where cust.CustomerID = ord.CustomerID
           Select cust, ord

For Each result In queryResults
    Debug.WriteLine(result.ord.Amount & "  " & result.ord.CustomerID & "  " & result.cust.CompanyName)
Next

' Output:
'   200.00  1  Contoso, Ltd
'   300.00  1  Contoso, Ltd
'   100.00  2  Margie's Travel
'   600.00  3  Fabrikam, Inc.
'   800.00  3  Fabrikam, Inc.

È possibile utilizzare la clausola Group Join per creare un risultato della query gerarchico che contiene una raccolta di oggetti cliente.Ogni oggetto cliente ha una proprietà che contiene una raccolta di tutti gli ordini per quel cliente.Nell'esempio di codice seguente viene illustrata un'espressione di query che combina dati del cliente e dell'ordine in un risultato gerarchico e restituisce una raccolta di tipi anonimi.La query restituisce un tipo che include una proprietà CustomerOrders che contiene una raccolta di dati ordine per tale cliente.Include anche una proprietà OrderTotal che contiene la somma dei totali per tutti gli ordini per quel cliente.(Questa query è equivalente a una query LEFT OUTER JOIN).

Dim customers = GetCustomers()
Dim orders = GetOrders()

Dim queryResults = From cust In customers
                   Group Join ord In orders On
                     cust.CustomerID Equals ord.CustomerID
                     Into CustomerOrders = Group,
                          OrderTotal = Sum(ord.Amount)
                   Select cust.CompanyName, cust.CustomerID,
                          CustomerOrders, OrderTotal

For Each result In queryResults
    Debug.WriteLine(result.OrderTotal & "  " & result.CustomerID & "  " & result.CompanyName)
    For Each ordResult In result.CustomerOrders
        Debug.WriteLine("   " & ordResult.Amount)
    Next
Next

' Output:
'   500.00  1  Contoso, Ltd
'      200.00
'      300.00
'   100.00  2  Margie's Travel
'      100.00
'   1400.00  3  Fabrikam, Inc.
'      600.00
'      800.00

Esistono molti altri operatori di query LINQ che è possibile utilizzare per creare efficaci espressioni di query.Nella prossima sezione di questo argomento vengono discusse le varie clausole query che è possibile includere in un'espressione di query.Per informazioni dettagliate sulle clausole di query di Visual Basic, vedere Query (Visual Basic).

Operatori di query LINQ di Visual Basic

Le classi nello spazio dei nomi System.Linq e negli altri spazi dei nomi che supportano query LINQ includono metodi che è possibile chiamare per creare e perfezionare query basate sulle esigenze dell'applicazione.Visual Basic include parole chiave per le clausole query più comuni, come illustrato nella tabella seguente.

' Returns the company name for all customers for which
' the Country is equal to "Canada".
Dim names = From cust In customers
            Where cust.Country = "Canada"
            Select cust.CompanyName

' Returns the company name and ID value for each
' customer as a collection of a new anonymous type.
Dim customerList = From cust In customers
                   Select cust.CompanyName, cust.CustomerID

' Returns all product names for which the Category of
' the product is "Beverages".
Dim names = From product In products
            Where product.Category = "Beverages"
            Select product.Name

' Returns a list of books sorted by price in 
' ascending order.
Dim titlesAscendingPrice = From b In books
                           Order By b.price

' Returns a combined collection of all of the 
' processes currently running and a descriptive
' name for the process taken from a list of 
' descriptive names.
Dim processes = From proc In Process.GetProcesses
                Join desc In processDescriptions
                  On proc.ProcessName Equals desc.ProcessName
                Select proc.ProcessName, proc.Id, desc.Description

' Returns a list of orders grouped by the order date
' and sorted in ascending order by the order date.
Dim orderList = From order In orders
                Order By order.OrderDate
                Group By OrderDate = order.OrderDate
                Into OrdersByDate = Group

' Returns a combined collection of customers and
' customer orders.
Dim customerList = From cust In customers
                   Group Join ord In orders On
                     cust.CustomerID Equals ord.CustomerID
                   Into CustomerOrders = Group,
                        TotalOfOrders = Sum(ord.Amount)
                   Select cust.CompanyName, cust.CustomerID,
                          CustomerOrders, TotalOfOrders

' Returns the sum of all order amounts.
Dim orderTotal = Aggregate order In orders
                 Into Sum(order.Amount)

' Returns the customer company name and largest 
' order amount for each customer.
Dim customerMax = From cust In customers
                  Aggregate order In cust.Orders
                  Into MaxOrder = Max(order.Amount)
                  Select cust.CompanyName, MaxOrder

' Returns a list of products with a calculation of
' a ten percent discount.
Dim discountedProducts = From prod In products
                         Let Discount = prod.UnitPrice * 0.1
                         Where Discount >= 50
                         Select prod.Name, prod.UnitPrice, Discount

' Returns a list of cities with no duplicate entries.
Dim cities = From item In customers
             Select item.City
             Distinct

' Returns a list of customers. The first 10 customers
' are ignored and the remaining customers are
' returned.
Dim customerList = From cust In customers
                   Skip 10

' Returns a list of customers. The query ignores all
' customers until the first customer for whom
' IsSubscriber returns false. That customer and all
' remaining customers are returned.
Dim customerList = From cust In customers
                   Skip While IsSubscriber(cust)

' Returns the first 10 customers.
Dim customerList = From cust In customers
                   Take 10

' Returns a list of customers. The query returns
' customers until the first customer for whom 
' HasOrders returns false. That customer and all 
' remaining customers are ignored.
Dim customersWithOrders = From cust In customers
                          Order By cust.Orders.Count Descending
                          Take While HasOrders(cust)

Per informazioni dettagliate sulle clausole di query di Visual Basic, vedere Query (Visual Basic).

È possibile utilizzare le funzionalità aggiuntive delle query LINQ chiamando i membri dei tipi enumerabili e queryable forniti da LINQ.È possibile utilizzare queste funzionalità aggiuntive chiamando un particolare operatore di query sul risultato di un'espressione di query.Nell'esempio di codice seguente viene utilizzato il metodo Union per combinare i risultati di due query in un unico risultato.Viene utilizzato il metodo ToList<TSource> per restituire il risultato della query come elenco generico.

Public Function GetAllCustomers() As List(Of Customer)
    Dim customers1 = From cust In domesticCustomers
    Dim customers2 = From cust In internationalCustomers

    Dim customerList = customers1.Union(customers2)

    Return customerList.ToList()
End Function

Per dettagli sulle funzionalità LINQ aggiuntive, vedere Cenni preliminari sugli operatori di query standard.

Connessione a un database utilizzando LINQ to SQL

In Visual Basic, si identificano gli oggetti del database SQL Server , ad esempio tabelle, visualizzazioni e stored procedure a cui si desidera accedere, utilizzando un file LINQ to SQL.Un file LINQ to SQL ha un'estensione .dbml.

Quando si dispone di una connessione valida a un database SQL Server, è possibile aggiungere un modello dell'elemento Classi LINQ to SQL al progetto.Verrà visualizzata Progettazione relazionale oggetti.Progettazione relazionale oggetti consente di trascinare gli elementi a cui si vuole accedere nel codice da Esplora server/Esplora database nell'area di progettazione.Il file LINQ to SQL aggiunge un oggetto DataContext al progetto.Questo oggetto include proprietà e raccolte per tabelle e visualizzazioni alle quali si desidera accedere e metodi per le stored procedure che si desidera chiamare.Dopo avere salvato le modifiche nel file LINQ to SQL (.dbml), è possibile accedere a questi oggetti nel codice facendo riferimento all'oggetto DataContext definito da Progettazione relazionale oggetti.L'oggetto DataContext per il progetto viene denominato in base al nome del file LINQ to SQL.Ad esempio, un file LINQ to SQL denominato Northwind.dbml creerà un oggetto DataContext denominato NorthwindDataContext.

Per esempi con istruzioni dettagliate, vedere Procedura: eseguire query in un database utilizzando LINQ (Visual Basic) e Procedura: chiamare una stored procedure utilizzando LINQ (Visual Basic).

Funzionalità di Visual Basic che supportano LINQ

Visual Basic include altre importanti funzionalità che rendono l'utilizzo di LINQ semplice e riducono la quantità di codice da scrivere per eseguire query LINQ.tra cui:

• Tipi anonimi che consentono di creare un nuovo tipo basato su un risultato della query.

• Variabili tipizzate in modo implicito che consentono di differire la specifica di un tipo e permettere al compilatore di dedurre il tipo in base al risultato della query.

• Metodi di estensione che consentono di estendere un tipo esistente con metodi senza modificare il tipo stesso.

Per informazioni dettagliate, vedere Funzionalità di Visual Basic che supportano LINQ.

Esecuzione query posticipata e immediata

L'esecuzione della query è distinta dalla creazione della query.Dopo che una query viene creata, l'esecuzione viene attivata da un meccanismo separato.Una query può essere eseguita appena definita (esecuzione immediata) oppure è possibile archiviare la definizione ed eseguire la query in un secondo momento (esecuzione posticipata).

Per impostazione predefinita, quando si crea una query, la query stessa non viene eseguita immediatamente.Invece, la definizione della query viene archiviata nella variabile utilizzata per fare riferimento al risultato della query.Quando si accede alla variabile del risultato della query nel codice, ad esempio in un ciclo For…Next, la query viene eseguita.Questo processo viene denominato esecuzione posticipata.

Le query possono essere eseguite anche quando vengono definite e in questo caso si parla di esecuzione immediata.È possibile attivare l'esecuzione immediata applicando un metodo che richiede l'accesso ai singoli elementi del risultato della query.Questo potrebbe risultare dall'inclusione una funzione di aggregazione, come Count, Sum, Average, Min o Max.Per ulteriori informazioni sulle funzioni di aggregazione, vedere Clausola Aggregate (Visual Basic).

Anche l'utilizzo dei metodi ToList o ToArray forza esecuzione immediata.Questo può essere utile quando si desidera eseguire immediatamente la query e memorizzare nella cache i risultati.Per ulteriori informazioni su tali metodi, vedere Conversione del tipo di dati.

Per ulteriori informazioni sull'esecuzione delle query, vedere Scrittura della prima query LINQ (Visual Basic).

XML in Visual Basic

Le funzionalità XML di Visual Basic includono i valori letterali XML e le proprietà axis XML che semplificano la creazione, l'accesso, l'esecuzione di query e la modifica di XML nel codice.I valori letterali XML consentono di scrivere l'XML direttamente nel codice.Il compilatore del Visual Basic trattano l'XML come oggetto dati di prima classe.

Nell'esempio di codice seguente viene mostrato come creare un elemento XML, accedere ai sub-elementi e agli attributi ed eseguire una query sul contenuto dell'elemento utilizzando LINQ.

' Place Imports statements at the top of your program.  
Imports <xmlns:ns="http://SomeNamespace">

Module Sample1

    Sub SampleTransform()

        ' Create test by using a global XML namespace prefix. 

        Dim contact = 
            <ns:contact>
                <ns:name>Patrick Hines</ns:name>
                <ns:phone ns:type="home">206-555-0144</ns:phone>
                <ns:phone ns:type="work">425-555-0145</ns:phone>
            </ns:contact>

        Dim phoneTypes = 
          <phoneTypes>
              <%= From phone In contact.<ns:phone> 
                  Select <type><%= phone.@ns:type %></type> 
              %>
          </phoneTypes>

        Console.WriteLine(phoneTypes)
    End Sub

End Module

Per ulteriori informazioni, vedere XML in Visual Basic.

Risorse correlate

Procedure e procedure dettagliate

Procedura: eseguire query in un database utilizzando LINQ (Visual Basic)

Procedura: chiamare una stored procedure utilizzando LINQ (Visual Basic)

Procedura: modificare dati in un database utilizzando LINQ (Visual Basic)

Procedura: combinare dati con LINQ utilizzando join (Visual Basic)

Procedura: ordinare i risultati di query utilizzando LINQ (Visual Basic)

Procedura: filtrare i risultati di una query utilizzando LINQ (Visual Basic)

Procedura: conteggio, somma, o media di dati utilizzando LINQ (Visual Basic)

Procedura: trovare il valore minimo o massimo in un risultato di query utilizzando LINQ (Visual Basic)

Walkthrough: Creating LINQ to SQL Classes (O/R Designer)

How to: Assign Stored Procedures to Perform Updates, Inserts, and Deletes (O/R Designer)

Capitoli del libro rappresentati

Chapter 17: LINQ in Programming Visual Basic 2008

Vedere anche

Attività

Esempi LINQ

Concetti

Cenni preliminari su LINQ to XML in Visual Basic

LINQ to DataSet Overview

DataContext Methods (O/R Designer)

Altre risorse

LINQ (Language-Integrated Query)

LINQ to SQL

Object Relational Designer (O/R Designer)