vb.net 代码实现不同form中表格之间的数据筛选并传递

在VB.NET中，为了实现在不同Form之间的数据筛选并传递，通常可以采用以下步骤：

1. **设置公共数据源**：
首先，确保两个表单都引用同一个数据访问层或业务层，其中包含共享的数据集或列表。这可以是一个数据库连接、一个DataTable或是ORM框架生成的对象。

Public Class BaseDataSource
    Shared Property DataSource As List(Of YourDataClass)
End Class '这里YourDataClass是你数据模型类

2. **筛选功能**：
在每个Form上添加筛选功能，如按钮点击事件处理，通过BaseDataSource的DataSource属性来过滤数据。例如，可以在Form1中：

Private Sub btnFilter_Click(sender As Object, e As EventArgs) Handles btnFilter.Click
    Dim filteredData = BaseDataSource.DataSource.Where(Function(item) item.FieldYouWantToFilter = yourValue)
    DisplayFilteredData(filteredData)
End Sub

Sub DisplayFilteredData(data As IEnumerable(Of YourDataClass))
    '在这儿显示筛选后的数据，比如填充另一个DataGridView控件
    DataGridView1.DataSource = data
End Sub

3. **数据传递**：
当需要从一个Form传递筛选结果到另一个Form时，可以创建一个新的实例并将筛选后的数据作为参数传递，或者使用全局变量、事件总线或者通过参数构造函数的方式。例如，从Form1到Form2：

Private Sub btnPassData_Click(sender As Object, e As EventArgs) Handles btnPassData.Click
    Dim filteredData = ... '获取筛选后的数据
    Dim newForm As New Form2()
    newForm.FilteredData = filteredData '假设Form2有一个FilteredData字段接收数据
    newForm.Show()
End Sub

4. **接收数据的Form2**：
在Form2中，可以在构造函数或者适当的地方接收这个传递过来的数据，并显示它：

Public Sub New(filteredData As IEnumerable(Of YourDataClass))
    InitializeComponent()
    DataGridView2.DataSource = filteredData
End Sub