VB.NET 创建(类似 MS ACCESS)“链接表单”

Posted

技术标签:

【中文标题】VB.NET 创建(类似 MS ACCESS)“链接表单”【英文标题】:VB.NET create (MS ACCESS like) "linked forms" 【发布时间】:2016-11-11 08:30:52 【问题描述】:

NET(基本)我在 form1 上有一个显示客户姓名的 DGV1(来自 SQL 数据库的数据集)。我想在 DGV1, form1 中双击“a”客户名称,然后在 DGV2, form2 中查看“客户详细信息”。

当在顶部 DGV 中选择客户名称然后在底部 DGV 中相应更新时,我可以在一个表单上轻松实现 DGV1 和 DGV2。我想要上面解释的两种形式。

谢谢, 米歇尔

【问题讨论】:

您是在问如何在单击网格上的一行时打开新表单吗? 你好史蒂夫,不,我可以从 DGV 点击打开一个新表单。如果我点击网格中的一条线,例如客户名称“John”然后我希望 form2 必须打开并在 DGV2 中显示 JOHN 的详细信息。例如年龄、性别、电话..所以我可以制作 DGV 但现在显示所有客户的所有详细信息..因为我在 form1 中选择了 JOHN,我只想在 form2 中查看 John 的详细信息.. 您的第二个表单应该收到点击的客户行的详细信息。你如何做到这一点取决于你如何初始化你的第一个网格。 (您是使用客户列表还是刚刚将网格绑定到 DataTable(在这种情况下,您是否检索了该表的主键)? 史蒂夫,我使用 VB.NET 2012。我制作 CustomerDataset 并将 datagridview 放在表单上。然后自动创建tableAdapter、bindingsource。现在我将客户详细信息放在表单上,​​并创建 tableAdapter、bining 源。 (所有这些都在单一表格上)如果我单击 DGV1 上的客户名称,则 DGV2 会显示该客户的详细信息。所有这些工作正常。但是现在............我想将DGV2移动到form2。然后如果双击 DGV1 中的客户名称,form1 ....然后 form2 必须打开并显示该客户的详细信息.. 【参考方案1】:

试试这个,我想这就是你要找的那个,

'This code below will hold the Value from your table 
Dim CustomerName as String
'This code below will hold the value of the selected row in DGV1
Dim SelectedName As Integer
SelectedName = DataGridView1.CurrentRow.Index

现在您要做的就是假设客户名称在 Column1 中,现在我们将获得这样的值。

CustomerName = DataGridView.Item(1, i).Value

所以每次您在 column1 中选择一个数据时会发生什么,该选定行的值将转到 CustomerName

接下来你要做的是创建一个 Form2 添加 Datagridview 并在你的代码中运行这个。

Form2.Show
'Create your own way of display data in datagridview but this time your where clause is like this (where ColumName = '" & CustomerName  & "')

问候

【讨论】:

嗨,保罗,非常感谢您的回复。我理解第一部分 - 它是确定点击的价值..获得价值。所以现在这个值必须传输到 form2。请原谅我英语不好,对编程也不太了解... 然后在form2....这个值必须用于某些过滤功能?我不明白form2现在如何过滤。假设我在form1中复制CustomerID ..现在我想在form2中过滤它。现在说 customerID "5" 我必须将 form2 DGV2 过滤为 "5" 所以......我不明白 form2 部分

以上是关于VB.NET 创建(类似 MS ACCESS)“链接表单”的主要内容,如果未能解决你的问题,请参考以下文章

使用 asp.net、vb.net 和 ms-access 的时间戳

寻求代码设计建议:使用 VB.Net 和 Ms-Access

ASP.NET - VB.NET - 更新 MS_Access 表

ASP.NET - MS-ACCESS - VB.NET - SQL 语句错误

ASP.NET - VB.NET - 从 MS-Access 数据库中检索记录

使用 VB.NET 打印 MS Access 报告