ricordati sempre di scrivere che errore viene restituito. ci faciliti la vita..
in ogni caso, prova con
codice:
        Dim Data As AutentObjVB = New AutentObjVB("server=(local);database=Clienti;user=sa")