No seu projeto VB em faça uma referência à biblioteca do Excel.
No Form:
Dim ApliExcel As New excel.Application
ApliExcel.Workbooks.Open FileName:=NomedoArqXLS
With ApliExcel
Faça um loop para ler linha a linha
Cada coluna poderá ser lida assim:
variáveloucampo1 = .Cells(linha, 1).Value
variáveloucampo2 = .Cells(linha, 2).Value
End With
SET ApliExcel = Nothing
Susana
