在vb.net中从treeview填充到文本框

我有一个数据库（ms access），有两个表，分别是tbl_Reqs和tbllab。我用tbl_Reqs填充了treeview节点。现在，我希望使用treeview的select节点将数据从第二个表填充到文本框

提前谢谢你的房子

导入System.Data.OleDb
公开课表格1
私有子表单1_Load（发送方作为对象，e作为事件参数）处理MyBase.Load
'TODO:这行代码将数据加载到'MolotobankiDataSet.tbllab'表中。您可以根据需要移动或删除它。
Me.TbllabTableAdapter.Fill（Me.MolotobankiDataSet.tbllab）
'TODO:这行代码将数据加载到'MolotobankiDataSet.tbl_Reqs'表中。您可以根据需要移动或删除它。
Me.Tbl_要求补充（Me.MolotobankiDataSet.Tbl_要求）
端接头
私有子Tbl_请求查询导航器SaveItem_单击（发件人作为对象，e作为事件参数）
Me.Validate（）
Me.Tbl_ReqsBindingSource.EndEdit（）
Me.TableAdapterManager.UpdateAll（Me.MolotobankiDataSet）
端接头
私有子按钮1\u单击（发送者作为对象，e作为事件参数）处理按钮1。单击
Tbl_ReqStableApter.Connection.Open（）
TreeView1.Nodes.Clear（）
FillTree（“1”，“库”，无）
Tbl_ReqStableApter.Connection.Close（）命令
端接头
公共子填充树（ByVal键作为字符串，ByVal Txt作为字符串，ByVal N作为树节点）
Dim cn作为OLEDB连接
Dim cmd作为OleDbCommand
Dim NN As TreeNode
如果N不算什么
NN=TreeView1.Nodes.Add（Key，Txt）
其他的
NN=N.Nodes.Add（Key，Txt）
如果结束
cn=Tbl_ReqstableApter.Connection
cmd=新的OleDbCommand（“从tbl_需求中选择*，其中ID_Parent=”&Key&“”，cn）
Dim dr=cmd.ExecuteReader
当里德博士（）时做
填充树（dr（“PK需求”）、dr（“mem需求”）、NN）
环
克洛斯博士（）
cmd.Dispose（）
端接头
末级

您是否考虑过使用数据集在两个数据表之间创建数据？你在问题中没有具体说明的关系。不，我会尝试一下，谢谢你的帮助…我尝试过了，但没有出路。。。如果需要更多帮助，您已经在那里存储了一个PK（

PK\u Req

）。我假设您在另一个数据表中有一个与此数据表相关的键。因此，将控件（右侧的控件）绑定到链接到第二个数据表的BindingSource。单击节点时，提取PK并在第二个数据表中选择相应的记录。CurrencyManager完成其余工作。您可以对数据集关系执行相同的操作。在本例中，您对第一个数据表而不是第二个数据表进行操作，如果您有支持数据源的其他控件，这将非常有用。TreeView没有（除非您构建一个这样做的控件，因为-我不建议使用该自定义控件，但大多数商业产品也这样做）。