No será que la definición de la sentencia está con mayúscula y en la creación del DataAdpater está en minúscula? No se como Vb.net maneja eso.
Código:
Sentencia="Exec busc '%"+request.form("texto")+"%'"
Dim da as new SqlDataAdapter(sentencia, objConn)