标题:两个DataGride,怎么做关联?
只看楼主
chensenduxiang
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2006-6-13
 问题点数:0 回复次数:3 
两个DataGride,怎么做关联?

我想通过两个DataGrid显示订单信息(DataGrid1)和订单分录信息(DataGrid2),。按照我下面的代码可以完成界面的加载,但是当我想单击DataGrid1里面的第二条订单的时候,Datagrid2里面就不能显示订单分录信息了。我不知道怎样能捕捉到Datagrid1的当前记录的字段值。或者能否直接关联?请大侠指点!

Private Sub TreeView1_AfterSelect(ByVal sender As System.Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles TreeView1.AfterSelect
Dim Dtl_SO As DataSet = New DataSet5
Dim adoRS As ADODB.Recordset = New ADODB.Recordset
Dim adors_SE As ADODB.Recordset = New ADODB.Recordset

Dim Fid As Integer

adoRS.Open("select * from Seord1 where [cusname]='" & Me.TreeView1.SelectedNode.Text & "'", Cnn1, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockReadOnly)
Fid = adoRS.Fields(0).Value
adors_SE.Open("select * from Seordentry1 where [finterid]=" & Fid, Cnn1, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockReadOnly)

Me.OleDbDataAdapter1.Fill(Me.DataSet51.Seord1, adoRS)
Me.OleDbDataAdapter2.Fill(Me.DataSet51.SeordEntry1, adors_SE)

DataGrid1.DataSource = Dtl_SO
DataGrid1.SetDataBinding(Me.DataSet51, "Seord1")

DataGrid2.DataSource = Dtl_SO
DataGrid2.SetDataBinding(Me.DataSet51, "Seord1.SeordEntry_R")
End Sub

搜索更多相关主题的帖子: DataGride 
2006-06-13 14:57
Enoch
Rank: 1
等 级:新手上路
帖 子:55
专家分:0
注 册:2006-4-26
得分:0 

DataGrid1.Item(DataGrid1.CurrentCell.RowNumber,n) 获取DataGrid1中鼠标点击行的第n列的数据。(n为数据表格的列数,第一列为0)。


2006-06-15 13:11
ncqingchuan
Rank: 1
等 级:新手上路
帖 子:58
专家分:0
注 册:2006-8-8
得分:0 

最简单的办法是通过 DataRelation 主键-外键关系连接。就可以实现你的功能了。

2006-08-08 14:08
chenjin145
Rank: 1
等 级:禁止访问
帖 子:3922
专家分:0
注 册:2006-7-12
得分:0 

同意樓上


[url=javascript:alert(1);] [div]fdgfdgfdg\" on\"[/div] [/url]
2006-08-08 15:10



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-71951-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.050803 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved