ورود اطلاعات به datagridview از یک فایل excel

[pooya1072]

سلام
من توی یک فرم یک button و یک datagridview قرار داده ام .
می خواهم از یک فایل اکسل که در اینجا test.xlsx نام داره اطلاعات رو وارد datagridview کنم . به کد های زیر توجه کنید :


Imports Microsoft.Office.Interop
Imports Microsoft.Office
Imports System.Runtime.InteropServices
Public Class Form1
Dim ExcelApp As New Microsoft.Office.Interop.Excel.Application
Dim ExcelBook As Microsoft.Office.Interop.Excel.Workbook
Dim ExcelSheet As Microsoft.Office.Interop.Excel.Worksheet = Nothing
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
ExcelBook = ExcelApp.Workbooks.Open("C:\Users\pooyan\Desktop\test.xlsx")
ExcelSheet = ExcelBook.Worksheets(1)
dgvExcel.DataSource = ExcelSheet
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
Private Sub Form1_Disposed(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Disposed
ExcelBook.Close()
End Sub
End Class

وقتی button1 رو کلیک می کنم برنامه بدون ارور اجرا میشه ولی هیچ اطلاعاتی از فایل اکسل توی دیتاگریدویو ظاهر نمیشه . من از oledb نمی خوام استفاده کنم .
آیا ممکنه همین روشی رو که من رفتم کامل کرد؟