在WINFORM程序中，怎么将EXCEL导到DATASET中。。急。。谢谢

Question

学习

Answer 1

参照：
Dim l_OleCon As OleDbConnection
Dim l_OleCmd As OleDbCommand
Dim l_OleDa As OleDbDataAdapter
Dim l_StrCon As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + pm_Path + _
 "; Extended Properties='Excel 8.0;HDR=true'"
Try
l_OleCon = New OleDbConnection(l_StrCon)
l_OleCmd = New OleDbCommand("select * from [test$]", l_OleCon)
l_OleCon.Open()
l_OleDa = New OleDbDataAdapter(l_OleCmd)
Dim l_Ds As New DataSet l_OleDa.Fill(l_Ds)