Lettura file txt in Visual Basic

Di seguito si riporta il codice utilizzato in  Visual Basic per leggere un file di testo (txt) all’interno di una “RichtextBox”. Innanzitutto il sistema che si va ad utilizzare è Visual Studio che è un prodotto che permette di poter utilizzare più linguaggi contemporaneamente dato un meta-linguaggio sottostante è uguale per tutti. I due linguaggi considerati sono: Vb.Net e C#.

Due sono i metodi che consentono di leggere il file di testo: il primo va a prendere il file di testo incorporandolo interamente nel programma , il secondo scorre il testo riga per riga e lo inserisce man mano nel sistema.

Vb.Net

• Read to end

Imports System
Imports System.IO

Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Me.RichTextBox1.Text = “Il mio primo programma”

‘Vogliamo aprire un file di testo’
Dim o As New OpenFileDialog
o.ShowDialog()
Dim NomeFile As String = o.FileName

Me.RichTextBox1.AppendText(Environment.NewLine & NomeFile)

‘Definizione del lettore’

Dim s As New StreamReader(NomeFile)

Dim TuttoIlfile As String = s.ReadToEnd()

Me.RichTextBox1.AppendText(Environment.NewLine & TuttoIlfile)

End Sub
End Class

• Read Line

Imports System
Imports System.IO

Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Me.RichTextBox1.Text = “Il mio primo programma”
‘Vogliamo aprire un file di testo
Dim o As New OpenFileDialog
o.ShowDialog()
Dim NomeFile As String = o.FileName

Me.RichTextBox1.AppendText(Environment.NewLine & NomeFile)

‘Definizione del lettore
Dim s As New StreamReader(NomeFile)

Dim Contatore As Integer = 1

Do

Dim RigaDelFile As String = s.ReadLine
Contatore = Contatore + 1
Me.RichTextBox1.AppendText(Environment.NewLine & “Riga #” & Contatore & “:” & RigaDelFile)
Loop Until s.EndOfStream

End Sub
End Class

Sotto, viene riportato il codice codificato in linguaggio C#:

C#

• Read to End

using Microsoft.VisualBasic;
using System;
using System.Collections;
using System.Collections.Generic;
using System.Data;
using System.Diagnostics;
using System.IO;

public class Form1
{
private void Button1_Click(object sender, EventArgs e)
{
this.RichTextBox1.Text = “Il mio primo programma”;

//Vogliamo aprire un file di testo’
OpenFileDialog o = new OpenFileDialog();
o.ShowDialog();
string NomeFile = o.FileName;

this.RichTextBox1.AppendText(Environment.NewLine + NomeFile);

//Definizione del lettore’

StreamReader s = new StreamReader(NomeFile);

string TuttoIlfile = s.ReadToEnd();

this.RichTextBox1.AppendText(Environment.NewLine + TuttoIlfile);

}
}

• Read Line

using Microsoft.VisualBasic;
using System;
using System.Collections;
using System.Collections.Generic;
using System.Data;
using System.Diagnostics;
using System.IO;

public class Form1
{
private void Button1_Click(object sender, EventArgs e)
{
this.RichTextBox1.Text = “Il mio primo programma”;
//Vogliamo aprire un file di testo
OpenFileDialog o = new OpenFileDialog();
o.ShowDialog();
string NomeFile = o.FileName;

this.RichTextBox1.AppendText(Environment.NewLine + NomeFile);

//Definizione del lettore
StreamReader s = new StreamReader(NomeFile);

int Contatore = 1;
do {
string RigaDelFile = s.ReadLine;
Contatore = Contatore + 1;
this.RichTextBox1.AppendText(Environment.NewLine + “Riga #” + Contatore + “:” + RigaDelFile);
} while (!(s.EndOfStream));

}
}