在 2 个字段访问 VBA 之间切换连续子表单的排序

Question

我有一个表单，它有一个包含几个字段的连续子表单，对这个问题很重要的是一个 ID 字段，它是唯一的文本和一个截止日期字段。不是表单加载所有记录，它们是由子表单的OrderBy 属性按 ID 字段排序的，而不是查询。

在父表单中，我有每列的标题和一个切换按钮，用于按截止日期排序激活和停用排序。现在表单加载按 ID 排序，当单击切换按钮时，它按我想要的日期排序。但是，当再次单击切换按钮并将其停用时，表单将保留其按日期排序。

这是我目前在切换按钮后面的代码：

Private Sub tglSortDueDate_Click()
    If Me.tglSortDueDate = True Then
        Me.sbfrmFindRecords.Form.OrderBy = "DueDate, ID"
        Me.OrderByOn = True
    Else
        Me.sbfrmFindRecords.Form.OrderBy = "ID"
        Me.OrderByOn = True
    End If

    Me.sbfrmFindRecords.Requery
End Sub

这可能吗，还是我应该更改记录源以根据我的记录源表在具有不同排序的 2 个查询之间切换？

提前致谢

Answer 1

我最终采用了不同的方法，而不是在表单方面进行排序，而是根据源查询使用 2 个不同的排序进行了 2 个查询。然后，当按钮被切换时，我在 2 个查询之间切换。