ECCOLA!!!!!!!!

codice:
        Dim conn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" & _
                                        "Data Source=c:\x\aaa.xls;" & _
                                        "Extended Properties=""Excel 8.0;HDR=Yes""")
        conn.Open()
        Dim comm As New OleDbCommand("SELECT * FROM [Foglio1$]", conn)
        Dim read As OleDbDataReader = comm.ExecuteReader
        While read.Read()
            MsgBox(read(1).ToString)
        End While
        conn.Close()
solo che non mi legge la prima riga, cioe' mi salta la riga 1 in tutti i fogli, perche???