Passa ai contenuti principali

VS2010 – VB.NET : Collection Initializers

Altra nuova funzionalità di linguaggio inserita nella versione VB.NET 10 è la possibilità di definire, istanziare e riempire delle collezioni di oggetti in un unica istruzione.

Nelle versioni precedenti di VB.NET avevamo bisogno di scrivere:

  1. Dim list = New List(Of Integer)
  2. With list
  3.     .Add(1)
  4.     .Add(2)
  5.     .Add(3)
  6.     .
  7.     .
  8. End With

Nella versione 10 di VB.NET possiamo, invece, scrivere

  1. Dim list = New List(Of Integer) From
  2.             {1,2,3,.,.,.,.}

I valori passati dopo la clausola From possono anche essere delle variabili.

Ma come si comporta il compilatore quando utilizziamo la nuova sintassi?

Per verificare ciò, supponiamo di avere la seguente classe:

  1. Public Class CityRepository
  2.  
  3.     Public Function GetCity() As List(Of String)
  4.         Dim cityList = New List(Of String) From
  5.                         {"Roma",
  6.                          "Milano",
  7.                          "Napoli",
  8.                          "Genova",
  9.                          "Firenze",
  10.                          "Torino"}
  11.         Return cityList
  12.     End Function
  13. End Class

Se la compiliamo (inserendola in un progetto Visual Studio 2010) ed analizziamo l’assembly ottenuto utilizzando Reflector, otteniamo:

aa

Possiamo osservare che il compilatore, di fatto, fa esattamente quello che avremmo fatto noi, creando una variabile d’appoggio, riempiendola con i valori e restituendola al chiamante.

Non c’è traccia della nostra variabile cityList. In effetti il compilatore si accorge che la nostra cityList è, di fatto, una variabile di appoggio, mai utilizzata nella funzione e immediatamente restituita ed effettua una sorta di ottimizzazione del codice.

Se, infatti, modifichiamo la classe nel seguente modo:

  1. Public Class CityRepository
  2.  
  3.     Public Function GetCity() As List(Of String)
  4.         Dim cityList = New List(Of String) From
  5.                         {"Roma",
  6.                          "Milano",
  7.                          "Napoli",
  8.                          "Genova",
  9.                          "Firenze",
  10.                          "Torino"}
  11.         cityList.Add("Udine")
  12.         Return cityList
  13.     End Function
  14. End Class

Otteniamo:

dd

In questo caso, la variabile di appoggio introdotta dal compilatore viene “travasata” nella nostra variabile cityList subito dopo aver terminato di aggiungere gli elementi nella definizione iniziale.

Ciò che possiamo dedurre da queste osservazioni è che l’inizializzazione delle collezioni in un’unica riga non ottimizza le performance del codice ma migliora semplicemente la leggibilità (e già sarebbe sufficiente per utilizzarla) essendo assolutamente identica (a livello di codice compilato) della modalità con cui si creavano analoghe liste in VB.NET 9.

In realtà non è esattamente così e per verificarlo supponiamo di avere la seguente classe:

  1. Public Class IntegerRepository
  2.  
  3.     Public Function GetList() As List(Of Integer)
  4.         Dim lista As List(Of Integer) = Nothing
  5.         Try
  6.             lista = New List(Of Integer)
  7.             With lista
  8.                 .Add(2)
  9.                 .Add(4)
  10.                 .Add(System.Convert.ToInt32("a"))
  11.                 .Add(6)
  12.             End With
  13.         Catch ex As Exception
  14.  
  15.         End Try
  16.         Return lista
  17.     End Function
  18. End Class

Evidentemente, viene sollevata un’eccezione nel momento in cui si cerca di convertire la stringa “a” in un intero.

All’uscita della funzione, la lista è, però parzialmente valorizzata (sono infatti presenti i valori 2 e 4 ma non il 6).

dddd Se, ora modifichiamo la classe nel seguente modo:

  1. Public Class IntegerRepository
  2.  
  3.     Public Function GetList() As List(Of Integer)
  4.         Dim lista As List(Of Integer) = Nothing
  5.         Try
  6.             lista = New List(Of Integer) From
  7.                 {2, 4, 6, System.Convert.ToInt32("a")}
  8.         Catch ex As Exception
  9.  
  10.         End Try
  11.         Return lista
  12.     End Function
  13. End Class

Otteniamo che la lista di ritorno, nonostante sia sempre sollevata l’eccezione, è vuota (anzi non è neanche istanziata):

21-12-2009 14-02-56

In sostanza, utilizzando la nuova sintassi si realizza una sorta di “transazione” nell’operazione di definizione/istanziazione/riempimento della lista: o abbiamo la lista completa o niente.

Se mettiamo a confronto le due funzioni (rinominando GetListOld() quella creata nella vecchia maniera) possiamo analizzare il codice generato con Reflector e vedere che il compilatore si comporta in maniera completamente differente:

rerer

Utilizzare, quindi, i collection inizializers non è solo un modo per ottenere una sintassi compatta e più leggibile ma anche un modo per ottenere una transazione nell’operazione di creazione di una collection.

Prima di chiudere vorrei evidenziare il fatto che la collection inizializer si basa, come abbiamo visto, sull’utilizzo del metodo Add della collezione che stiamo istanziando. Questo significa che, se per caso, ridefiniamo tale metodo, tutto funziona in maniera automatica.

Ad esempio supponiamo di definire una classe Customer:

  1. Public Class Customer
  2.     Property ID As Integer
  3.     Property FirstName As String
  4.     Property LastName As String
  5. End Class

e di definire un metodo di estensione Add() che agisce su un’istanza dell’interfaccia IList e aggiunge un nuovo Customer:

  1. Imports System.Runtime.CompilerServices
  2.  
  3. Public Module Module1
  4.  
  5.     <Extension()>
  6.     Public Sub Add(ByVal list As IList(Of Customer),
  7.                     ByVal ID As Integer,
  8.                     ByVal FirstName As String,
  9.                     ByVal LastName As String)
  10.  
  11.         list.Add(New Customer With {.ID = ID,
  12.                                     .FirstName = FirstName,
  13.                                     .LastName = LastName})
  14.     End Sub
  15.  
  16. End Module

In questo modo creiamo una sorta di overload del metodo Add dell’interfaccia IList ed il compilatore è in grado di risolvere la seguente istruzione:

  1. Dim list As New List(Of Customer) From {
  2.             {1000, "Mario", "Rossi"},
  3.             {1100, "Giuseppe", "Verdi"},
  4.             {1200, "Carlo", "Bianchi"}}

restituendoci una lista di tre oggetti Customer:

sassa Se analizziamo il codice generato dal compilatore, ci rendiamo conto che viene, effettivamente, richiamato il nostro metodo di estensione:

hggh

Commenti

Post popolari in questo blog

VB.NET : Aggregare stringhe con LINQ

Tip facile facile, ma a qualcuno potrebbe servire. Supponiamo di avere una lista di stringhe (magari come risultato di una query LINQ) e di voler ottenere una stringa con la concatenazione delle stesse: Dim list = CreateList() Dim concatStr = (From s In list _ Select s).Aggregate( Function (currentString, nextString) currentString + nextString) MessageBox.Show(concatStr) Il metodo CreateList non ci interessa, in questo momento, ma crea una lista di oggetti String. Protected Function CreateList() As IEnumerable( Of String ) Dim list As String () = {" stringa1 ", " stringa2 ", " stringa3 ", " stringa4 ", " stringa5 "} Return list.AsEnumerable() End Function Questo metodo potrebbe restituire una qualsiasi lista di oggetti di cui, nella select successiva recuperiamo solo stringhe. La stessa tecnica è utilizzabile per concatenare stringhe inserendovi un carattere separatore Dim list = CreateList() Dim

VB.NET: SplashScreen con effetto fade-in

In questo post vorrei proporvi un modo per realizzare una splash screen per le nostre applicazioni Windows Form che appare progressivamente con un effetto fade. Supponiamo di avere il nostro progetto VB.NET in una soluzione Visual Studio 2008 in cui abbiamo il sorgente della nostra applicazione Windows Form. Inseriamo una splash screen utilizzando il menù Progetto->Aggiungi Nuovo Elemento e selezionando il tipo di elemento “Schermata Iniziale” A questo punto Visual Studio creerà, automaticamente, la schermata iniziale che possiamo personalizzare graficamente come vogliamo. Per poter fare in modo che questa finestra appaia nel momento in cui avviamo l’applicazione, è necessario aprire le proprietà del progetto e impostare la maschera di avvio: In questo modo, all’avvio dell’applicazione, la schermata appare immediatamente e scompare un attimo prima della visualizzazione della finestra dell’applicazione. Possiamo far apparire la schermata iniziale con un ef

VB.NET: Convertire un file DOC in RTF e PDF con office interop

In questo post vorrei proporvi del codice per poter convertire un file .doc in un file .rtf oppure .pdf utilizzando le API di interoperabilità di Office. Creeremo una classe, DocConverter, che esporrà le due funzionalità sopra citate. Cominciamo con il prevedere un attributo privato della classe che rappresenterà l’applicazione Word che utilizzeremo per la conversione. Creeremo l’istanza dell’attributo privato all’interno del costruttore della classe: Public Sub New () If Not CreateWordApp() Then Throw New ApplicationException(" Assembly di interoperabilità con Office non trovato! ") End If End Sub Private _wordApp As Word.ApplicationClass Protected Function CreateWordApp() As Boolean Dim retval = True Try _wordApp = New Word.ApplicationClass() _wordApp.Visible = False Catch ex As System.Exception _wordApp = Nothing retval = False End Try Return retval End Function La conve