Ragazzi..domani ho il compito di informatica e in un esercizio devo assegnare ad una etichetta, il risultato di una query come mostrato qui:


Dim db As DAO.Database
Dim r As DAO.Recordset
Dim s As String
Dim x As Integer

Set db = CurrentDb()
x = CodiceCliente.Text
s = "select nome from t_Clienti where codice=" & x
Set r = db.OpenRecordset(s, dbOpenSnapshot)

Etichetta30.Caption = s


I riferimenti ci sono, che sbaglio?
Grazie

Ciao Alessandro, googlando per caso ho letto questo post.
Anche se il compito è finito...
Se la memoria mi assiste, l'istruzione forse la eseguirebbe pure, ma tu non la stai associando alla label.
Dall'immagine che vedo infatti ti esce esattamente la stringa SQL non il risultato del record set.

Etichetta30.Caption = s

"s" è appunto la stringa non il risultato dell'interrogazione al DB che invece è contenuto in "r"
e il valore lo estrai con il punto così...

Etichetta30.Caption = r.nome

Poi secondo me la stringa così impostata non è corretta. Lo è più quella di 42, perchè devi chiudere tutto in una stringa (es. s="xyz &...&" non s="xyz" & ... ) e se è un numero non devi utilizzare gli apici ' ' che servono per le stringhe
quindi
s = "select nome from t_Clienti where codice=" & x &""
Ciao