Dim sr As New IO.StreamReader("percorso file")
Dim Testo As String = sr.ReadToEnd()
Me.Txt.Text = Testo