Ciao e grazie L.Mondi ho provato e modificato il codice che mi hai mandato siccome io ho solo una casella ti testo da controllare
ma non mi riconosce il file NomeFile= '" & NomeNF & "'"
questo è il mio codice
codice:
' Controlla che il professionista ed il progetto NON sia inserito già nel BD:
        RSTctr.Source = "SELECT Nome, NomeFile FROM TblClienti WHERE Nome='" & FrmMain.txtnome.Text & "' And  NomeFile= '" & nome & "'"
        RSTctr.Open , Cns1
        
        ' Il Professionista è presente nel DB, esce dalla routine:
        If RSTctr.EOF = False And RSTctr.BOF = False Then
            MsgBox "Il professionista: " & FrmMain.txtnome.Text & " " & FrmMain.txtnome.Text & NomeNF & Chr(13) _
            & "è già registrato nel database.", vbInformation + vbOKOnly, " ........... "
        End If
Ciao e grazie