modifica lo siguiente en tu cadena e conexion :
Código vb:
Ver originalaConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; DataSource=D:\\Kiosco.mdb;Extended Properties='Excel 8.0;HDR=Yes;IMEX=1'")
Prueba y nos comentas!
.
Fuente :
http://www.connectionstrings.com/excel