MSAccess VBA ORDER BY не работает на динамическом источнике записей

Question

Код ниже устанавливает источник записей в моей форме.ORDER BY не работает, так как все свойства формы не заполнены.Как получить сортировку?

Private Sub Form_Load()

    If Me.OpenArgs <> "" Then

        Me.AllowFilters = True
        Me.FilterOn = True
        Me.RecordSource = "QRY: BPRIL Data Entry By Order"
        Me.Filter = Me.OpenArgs
        Me.Requery

    ElseIf (Me.RecordSource <> "BPRIL Data Entry") Then

        Me.RecordSource = "BPRIL Data Entry"
        Me.Requery

    End If

    Me.OrderBy = "[Item #]"
    Me.OrderByOn = True

End Sub

Answer 1

Если вы устанавливаете источник записей, почему бы не воспользоваться возможностью сортировки?

Me.RecordSource = "SELECT Stuff FROM [BPRIL Data Entry] ORDER BY [Item #]"

Вы должны подумать о том, чтобы сделать себе одолжение и избавиться от пробелов в именах таблиц и полей, это облегчит жизнь.