VB.NET2003页面之间数据传递

little_potato 2008-04-21 09:46:36

VB.NET2003 ACCESS2003
部分代码
Form1代码：
Dim atable As New Data.DataTable //a,b,c三个table内容来自数据库中的4张表，每张表公共字段为ID
Dim btable As New Data.DataTable
Dim ctable As New Data.DataTable
Dim arow1 As Data.DataRow
.
.
Dim arown As Data.DataRow
Dim brow1 As Data.DataRow
.
.
Dim brown As Data.DataRow
Dim crow1 As Data.DataRow
.
.
Dim crown As Data.DataRow
Private Sub ahead()
atable.Columns.Add("A类属性名")
atable.Columns.Add("值")
End Sub
Private Sub bhead()
btable.Columns.Add("B类属性名")
btable.Columns.Add("值")
End Sub
Private Sub chead()
ctable.Columns.Add("C类属性名")
ctable.Columns.Add("值")
End Sub
arow1 = atable.NewRow
arow1.Item(0) = "属性名"
arow1.Item(1) = ""
atable.Rows.Add(arow1)
btable和ctable同样
datagrid1.datasource=atable
datagrid2.datasource=btable
datagrid3.datasource=ctable
之后数据存入数据库

Form2中用一个DataGrid显示其中1张表的内容，选择一行，点击“OK”按钮，将此ID对应的所有属性显示在Form1的atable，btable和ctable相应的行中。
不会做了。各位给点思路。能有代码最好。谢谢了。在线等。

...全文