| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 669 人关注过本帖
标题:两个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
快速回复:两个DataGride,怎么做关联?
数据加载中...
 
   



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

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