Conversione e lettura di un file .CSV con Visual Basic di dati finanziari

Per convertire e  leggere un file .cvs innanzitutto bisogna definire la classe Streamreader.

CLASSE STREAMREADER:Implementa un oggetto TextReader che legge i caratteri da un flusso di byte in una particolare codifica.

Per esaminare il codice sorgente di .NET Framework per questo tipo, vedere il Reference Source.

Spazio dei nomi:   System.IO

Assembly:  mscorlib (in mscorlib.dll)

Sintassi: 

C#         

[SerializableAttribute]
[ComVisibleAttribute(true)]
public class StreamReader : TextReader

VB

<SerializableAttribute>
<ComVisibleAttribute(True)>
Public Class StreamReader
 Inherits TextReader


Procedura: leggere il file di dati storici con  StreamReader (Visual Basic)

Considero la seguente tabella di dati storici utilizzata a lezione:




Il codice è:














Imports System
Imports System.IO
Imports Microsoft.VisualBasic
 
Public Class Form1
 
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
        Dim stream As FileStream
        Dim rstream As StreamReader
        Dim wstream As StreamWriter
        Dim lines(10) As String
        Dim i, y As Integer
 
        i = 0
 
        stream = New FileStream("C:\prova.txt", FileMode.Open, FileAccess.ReadWrite)
        rstream = New StreamReader(stream)
        wstream = New StreamWriter(stream)
 
 
        'leggo il file e salvol ongi linea nell'array lines
        While Not rstream.EndOfStream
            lines(i) = rstream.ReadLine()
            i = i + 1
        End While
        'rstream.Close()
 
        'sostituisco il 3o elemento dell'array con la frase di programmazione
        lines(2) = "di programmazione"
 
        'scrivo dall'inizio del file
        stream.Position = 0
        For y = 0 To i - 1
            wstream.WriteLine(lines(y))
        Next
 
        wstream.Close()
        stream.Close()
    End Sub
End Class




Se andiamo ad usare una RichTextBox avremo: