[Resolvido]Caixa de combinação - selecionar o ultimo registro

Boa tarde,

Como posso selecionar na caixa de combinação o ultimo registro do cliente.
Tenho uma caixa de lista que seleciona o registro (SELECT DISTINCTROW [ESPELHO].CLASSE FROM ESPELHO GROUP BY [ESPELHO].CLASSE;)
E no click update
Private Sub cmbPesq_AfterUpdate()
   Dim vartemp As Database, espelho As Recordset, Sql As String
   Sql = "SELECT ativo, vaga, doe, classe " & _
         "FROM espelho " & _
         "WHERE classe='" & cmbPesq.Text & "';"
   Set vartemp = CurrentDb
   Set espelho = vartemp.OpenRecordset(Sql)
   If Not espelho.RecordCount = 0 Then
       VAGA = IIf(IsNull(espelho!VAGA), "", espelho!VAGA)
       ativo = IIf(IsNull(espelho!ativo), "", espelho!ativo)
       CLASSE = IIf(IsNull(espelho!CLASSE), "", espelho!CLASSE)
       Udoe = IIf(IsNull(espelho!DOE), "", espelho!DOE)
   Else
       MsgBox "Não há registro.", vbExclamation, "Erro"
   End If
   Set vartemp = Nothing
   Set espelho = Nothing
  End Sub

Só que não traz o ultimo registro lançado.
a tabela tem o seguinte campos:
Classe      Ativo    Doe             Quantidade         Vava
1                45     01/04/2017       2                     10
2                 10    02/04/2017       1                     5
1                 35    10/04/2017      10                   20
1                 30    11/04/2017       5                    25
2                 5      12/04/2017       5                   10

Eu queria que fosse selecionado ao clicar na caixa de combinação no caso Classe = 1 - o ultimo registro datado de 11/04/2017 - no código acima seleciona o primeiro.
grato

Bom dia, tenta algo assim:

"WHERE classe='" & cmbPesq.Text & "' & " ORDER BY cmbPesq.text DESC;"

Boa tarde amigo. Tentei o comando, mas está dando erro de sintaxe. Erro em tempo de execução 3075.

Gentileza, postar aqui partes do sistema envolvidas na duvida.

Boa tarde,

Só um pitaco. Tente:

"WHERE classe=" & cmbPesq.Text & " ORDER BY " & cmbPesq.text & " DESC;"

Abraço.

Valeu amigos Cassio e Silvio

deu alguns erro de sintaxe, mas agora ficou legal. Ficou assim:

"WHERE classe='" & cmbPesq.Text & "' ORDER BY '" & cmbPesq.Text & "' ASC;"

Não sei o por que somente funcionou com o ASCendente.

Obrigadooo