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

Question

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

在父表单中，我有每列的标题和一个切换按钮，用于按截止日期排序激活和停用排序。现在，表单加载按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个查询之间切换。