Read Excel cell values in VB.Net

This Code will help you to read Excel vales by VB.Net.

Imports Excel
Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim I As Integer
Dim app As New Excel.Application
Dim WB As Excel.Workbook = app.Workbooks.Open("C:\Test.xls")
Dim ws As Excel.Worksheet = WB.Worksheets.Item(1)
Dim oRNG As Excel.Range
For I = 2 To ws.Rows.Count
oRNG = ws.Cells(I, 1)
MsgBox(oRNG.Value.ToString)
Next
'MsgBox(ws.Range(1, 1).Text)
End Sub

End Class