Hvordan skriver jeg SQL

Jeg har en knap der gør således.
Private Sub Kommandoknap32_Click()

Dim VARa As Long
VARa = Me.KundeNr
DoCmd.OpenForm "Salg_damer"
Forms!salg_damer!Tekst25 = VARa
End Sub

og det virker perfekt

men i stedet for
VARa = Me.KundeNr

vil jeg gerne have
VARa = SELECT Max([Kundenr]) FROM dbo_Kunde_dame;

Hvordan gør man så den kan læse det SQL