在 VB.Net的GridData里Key in 一些data。

请问有谁知道如何Key in data 在VB.Net 的grid data的Cell里。

请各位帮帮忙替小弟解答。谢谢！

meemee

ADO的做法：
(需要add reference去ADODB)
Dim rs As New ADODB.Recordset
Dim MyConnection As New ADODB.Connection

Dim tb As New DataTable
Dim ds As New DataSet
Dim Rec1(2) As Object

Myconnection.Open("Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\My Documents\programming\Prog2\Ot(jul~1.mdb")

rs.Open("Employee", Myconnection)

tb.Columns.Add(rs.Fields(0).Name)
tb.Columns.Add(rs.Fields(1).Name)
tb.Columns.Add(rs.Fields(2).Name)

Rec1(0) = rs.Fields(0).Value
Rec1(1) = rs.Fields(1).Value
Rec1(2) = rs.Fields(2).Value
tb.Rows.Add(Rec1)

ds.Tables.Add(tb)
DataGrid1.DataSource = ds.Tables(0)


ADO.NET的做法：
(以下的这些coding都可以用designer和wizard做到，不用自己打coding)
Dim ds As New DataSet

Dim OleDbConnect As New OleDb.OleDbConnection( _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\My Documents\programming\Prog2\Ot(jul~1.mdb")

Dim MyOleDb As New OleDb.OleDbDataAdapter( _
"select * from Employee", OleDbConnect)

MyOleDb.Fill(ds)
DataGrid1.DataSource = ds.Tables(0)