Добавить сортировку в запрос

Здравствуйте ребят, подскажите как решить малюсенькую проблемку:

Имеем код:

Me.RecordSource = "SELECT * FROM Delor " & WHERE

Private Function WHERE() As String
    WHERE = "WHERE 1=1 " & " AND " + WhereTip & " AND " + WhereStatus & " AND " + _
        WherePos  '1=1 чтобы в любом случае было, к чему добавить " AND ..."
End Function

Как мне добавить сортировку по возрастанию по полю Delor.Номер?

ORDER BY NOMBER,

Me.RecordSource = "SELECT * FROM Delor " & WHERE & " order by nomer"

alvk, а я вот подумал почему то, что так низя! Вроде работает СПАСИБО

1=1 чтобы в любом случае было, к чему добавить
Какая то особая уличная магия.

MrMuscul
1=1 чтобы в любом случае было, к чему добавить Какая то особая уличная магия.

Всего лишь удобный прием при конструировании динамического скл, чтобы не возиться с проверками есть в выражении Where или нет его