Sql 在Visual Basic 6.0中如何在数据报表中分组后加载datamember

分组前的查询正在运行：

private sub cmd_report1_Click()
    if data.rs1.state = adstateopen then
        data.rs1.state.close
    end if
    data.rs1.state.open
    report1.show
    data.rs1.filter = "[date] >= '" & text1.text & "'"
end sub

但是在我把它分组之后…我再也不能过滤它了

private sub cmd_report1_Click()
    if data.rs1_grouping.state = adstateopen then
        data.rs1_grouping.state.close
    end if
    data.rs1_grouping.state.open
    report1.show
    data.rs1_grouping.filter = "[date] >= '" & text1.text & "'"
end sub
                                  ^
                                  |
                         got error here i think

这是我的数据环境在环境前后的显示

以前

data
- connection1
  -(sql) rs1
    category
    date
    name
    ...

之后

---

您能帮我修复它吗？？？

在显示报告之前尝试应用过滤器。如果不起作用，则在应用过滤器后将报表对象绑定到数据对象。也许这些想法中的一个会起作用。它仍然是错误的…在那里，我添加了我的数据环境…它在我分组分类后被折叠了…因为我不能再过滤它了，但我需要像上面的查询一样过滤它…你能帮我吗@博布罗德斯

data
- connection1
 -(sql) rs1 grouped using rs1_grouping
   -(folder) summary fields in rs1_grouping
     category
   -(folder) detail_fields in rs1
     category
     date
     name
     ...