Come faccio a controllare l'esistenza di un campo in un RecordSet?

Io faccio una query con sub-query del tipo seguente
SELECT campo1, (select codice from tabella1, tabella2 where tabella1.codice = tabella2.codice) as codice
from tabella1
Io ogni volta che utilizzo rs("codice") ma non esiste un codice relativo al campo1 naturalmente mi dà questo errore:
ADODB.Recordset error '800a0cc1'

Impossibile trovare l'oggetto nell'insieme corrispondente al nome o al numero richiesto.

Come faccio a eseguire un controllo per sapere se esiste quel campo in quel record del recordset senza ottenere errori?