Private Sub btnLeggi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLeggi.Click
        ' Dichiarazione variabili per esecuzione procedura  
        Dim myFileStream As FileStream
        Dim myStreamReader As StreamReader
        ' Apro il file 
        myFileStream = New FileStream("c:\miofile.txt", FileMode.Open, FileAccess.Read, FileShare.Read)
        ' Leggo l'output con la classe stream reader 
        myStreamReader = New StreamReader(myFileStream)
        ' Visualizzo il contenuto del file 
        MessageBox.Show(myStreamReader.ReadToEnd)
        myFileStream.Close()
    End Sub