[Code]
Dim sConnectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\;Extended Properties=""text;HDR=No;FMT=Delimited"""
        Dim objConn As New OleDbConnection(sConnectionString)
        objConn.Open()

        Dim objCmdSelect As New OleDbCommand("SELECT * FROM Testa.csv", objConn)
        Dim objAdapter1 As New OleDbDataAdapter()
        objAdapter1.SelectCommand = objCmdSelect

        Dim objDataTable As New DataTable()
        Dim objDataReader As OleDbDataReader = objCmdSelect.ExecuteReader()
        objDataTable.Load(objDataReader)

        For Each dr As DataRow In objDataTable.Rows
            EsportaTabella.ImportRow(dr)
        Next

        TableDataGrid.DataSource = EsportaTabella
        objConn.Close()
[/Code]