Visual Basic - Problema con Sentencia SQL

cuando hago lo siguente en un formulario de VB :

Dim X as string

X = cnn.execute (SELECT COUNT (*) IdUsuario FROM Usuarios)

text1.text = X

me arroja un mensaje de error "No coinciden los tipos".
Lo que intento hacer es contar la cantidad de registros usando una sentencia SQL.
Que esta mal? o como debo hacer esto?

Gracias

Hola.
Lo correcto es:

Dim X as New ADODB.RecordSet

Set X = cnn.execute ("SELECT * FROM Usuarios")

if X.EOF and X.BOF Then
MsgBox "No hay registros"
else
text1.text = X.RecordCount
end if

X.close

Entendiendo que cnn es una conexión y está abierta.