This code does not give the desired result.
Here is the VB code we are using with the attached spreadsheet.
Dim dt As DateTime = worksheet.Cells(1, 6).DateTimeValue
We have also found another problem with the attached CSV file. The source cell contains the string "01". But both of the following calls return just 1 as an integer, not the original string which is required. Make sure you open the CSV as a text file if you want to see the original string value "01".
Dim s As String = worksheet.Cells(1, 1).Value.ToString()
Dim s As String = worksheet.Cells(1, 1).StringValue