现有姓名查询功能正常，如何在ReportViewer中实现双数据区间查询？

嘿，我来帮你搞定这个双区间查询的需求！你已经完成了姓名模糊查询的功能，现在要扩展成基于TextBox1和TextBox2的区间筛选，我给你梳理了两种常见场景的实现方案，还有一些关键注意事项：

核心思路 #

1. 先验证用户输入的有效性（避免非数值/非日期导致的错误）
2. 灵活组合筛选条件：支持仅输入最小值、仅输入最大值、同时输入两者的区间查询
3. 保留原来的异常处理，同时增加友好的错误提示

场景1：筛选数值型字段（比如金额、ID、数量） #

假设你要筛选的是名为Amount的数值字段，把下面的代码替换你原来的Try-Catch块内容：

Try
    Dim filterConditions As New List(Of String)()
    
    ' 初始化区间值变量
    Dim minValue As Double? = Nothing
    Dim maxValue As Double? = Nothing
    
    ' 处理TextBox1（最小值输入）
    If Not String.IsNullOrEmpty(TextBox1.Text.Trim()) Then
        If Double.TryParse(TextBox1.Text.Trim(), minValue) Then
            filterConditions.Add($"Amount >= {minValue}")
        Else
            MessageBox.Show("请输入有效的最小值！")
            Return
        End If
    End If
    
    ' 处理TextBox2（最大值输入）
    If Not String.IsNullOrEmpty(TextBox2.Text.Trim()) Then
        If Double.TryParse(TextBox2.Text.Trim(), maxValue) Then
            filterConditions.Add($"Amount <= {maxValue}")
        Else
            MessageBox.Show("请输入有效的最大值！")
            Return
        End If
    End If
    
    ' 组合并应用筛选条件
    If filterConditions.Count > 0 Then
        Me.tableBindingSource.Filter = String.Join(" AND ", filterConditions)
    Else
        Me.tableBindingSource.RemoveFilter()
        fatura_form_Load(sender, e)
    End If
    
    ' 刷新报表
    Me.ReportViewer1.RefreshReport()
Catch ex As Exception
    MessageBox.Show($"查询出错：{ex.Message}")
End Try

场景2：筛选日期型字段（比如订单日期、创建时间） #

如果要筛选的是日期字段（比如OrderDate），调整解析逻辑和Filter格式即可：

Try
    Dim filterConditions As New List(Of String)()
    
    ' 初始化日期变量
    Dim startDate As Date? = Nothing
    Dim endDate As Date? = Nothing
    
    ' 处理TextBox1（起始日期）
    If Not String.IsNullOrEmpty(TextBox1.Text.Trim()) Then
        If Date.TryParse(TextBox1.Text.Trim(), startDate) Then
            ' BindingSource的Filter中日期需要用#包裹，统一格式避免歧义
            filterConditions.Add($"OrderDate >= #{startDate:yyyy-MM-dd}#")
        Else
            MessageBox.Show("请输入有效的起始日期！")
            Return
        End If
    End If
    
    ' 处理TextBox2（结束日期）
    If Not String.IsNullOrEmpty(TextBox2.Text.Trim()) Then
        If Date.TryParse(TextBox2.Text.Trim(), endDate) Then
            filterConditions.Add($"OrderDate <= #{endDate:yyyy-MM-dd}#")
        Else
            MessageBox.Show("请输入有效的结束日期！")
            Return
        End If
    End If
    
    ' 组合并应用筛选条件
    If filterConditions.Count > 0 Then
        Me.tableBindingSource.Filter = String.Join(" AND ", filterConditions)
    Else
        Me.tableBindingSource.RemoveFilter()
        fatura_form_Load(sender, e)
    End If
    
    ' 刷新报表
    Me.ReportViewer1.RefreshReport()
Catch ex As Exception
    MessageBox.Show($"查询出错：{ex.Message}")
End Try

关键注意事项 #

• 替换实际字段名：把代码中的Amount或OrderDate改成你数据库中对应的字段名称
• 保留姓名查询（可选）：如果需要同时支持姓名模糊查询，可以添加一个新的TextBox（比如TextBox3），然后把姓名筛选条件加入filterConditions列表，示例代码如下：

  If Not String.IsNullOrEmpty(TextBox3.Text.Trim()) Then
      Dim nameKeyword As String = TextBox3.Text.Trim()
      filterConditions.Add($"Name_Lastname LIKE '%{nameKeyword}%'")
  End If
  

• 输入验证很重要：添加TryParse可以避免用户输入非法内容导致的程序崩溃
• 异常处理优化：捕获异常后给出具体提示，方便排查问题

内容的提问来源于stack exchange，提问作者X - Developer