[sayedf1]

السلام عليكم

ان كان الهدف عرض البيانات فاليك طريقة بدون ادوات خارجيه

يلذمك فورم علية داتا جريد فيو و زر للضغط عليه
في حدث الضغط على الزر اكتب

كود :

Try

           Dim MyConnection As System.Data.OleDb.OleDbConnection
           Dim dataSet As System.Data.DataSet
           Dim MyCommand As System.Data.OleDb.OleDbDataAdapter
           Dim path As String = "d:\12.xlsx"

           MyConnection = New System.Data.OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" + path + ";Extended Properties=Excel 12.0;")
           MyCommand = New System.Data.OleDb.OleDbDataAdapter("select * from [ورقة1$]", MyConnection)

           dataSet = New System.Data.DataSet
           MyCommand.Fill(dataSet)
           DataGridView1.DataSource = dataSet.Tables(0)

           MyConnection.Close()
       Catch ex As Exception
           MsgBox(ex.Message.ToString)
       End Try