il problema esula dall'apposizione di apici singoli o doppi.
è ovvio che in VB se chiudi gli apici, la sintassi corretta vorrebbe che l'istruzione termini, o che ci sia un concatenamento di stringhe con l'operatore &
ma a parte questo, ho la netta impressione che la tua query sia stata creata con Access e copiata pari pari in VB...
Questo è un problema.
perchè il motore Jet che credo tu stia usando, non riconosce la funzione DateDiff, che è peculiare di Access.
a mio avviso devi organizzare la query in altro modo.
Boolean