[VB6] Sapere se esiste valore in una tabella con DataEnvironment

[gprox]

Come da titolo ho in un progetto un dataenvironment con cui mi connetto a varie tabelle di un DB ora ho la necessità di sapere se in una tabella in un campo preciso esiste un valore io ho usato questo codice ma pare non funzioni qualche idea

Dim c As Boolean
Dim strSql As String

strSql = "Select count(*) from tab where campo = '" & text1.text & "' "

c = strSql

MsgBox (c) 

Sia mettendo valori che esistono che no, ottengo false quindi c'è qualcosa che non và nel codice, perfavore dategli un occhiata grazie