查看: 930|回复: 1
|
在 VB.Net的GridData里Key in 一些data。
[复制链接]
|
|
请问有谁知道如何Key in data 在VB.Net 的grid data的Cell里。
请各位帮帮忙替小弟解答。谢谢! |
|
|
|
|
|
|
|
发表于 2-11-2005 11:33 PM
|
显示全部楼层
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) |
|
|
|
|
|
|
| |
本周最热论坛帖子
|