Dim da As New OleDb.OleDbDataAdapter("select *from ", "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" +文件位置和名字)
Dim ds As New DataSet
da.Fill(ds)
DataGrid1.DataSource = ds.Tables.Item(0).DefaultView
Dim da As New OleDb.OleDbDataAdapter("select *from ", "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" +文件位置和名字)
Dim ds As New DataSet
da.Fill(ds)
DataGrid1.DataSource = ds.Tables.Item(0).DefaultView
Dim da As New OleDb.OleDbDataAdapter("select *from ", "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" +文件位置和名字)
Dim ds As New DataSet
da.Fill(ds)
DataGrid1.DataSource = ds.Tables.Item(0).DefaultView