[Resolvido] Select Count em uma variável

Buenas, gostaria de saber como por o valor de um select count em uma variável.

Tentei de diversas formas.

uma delas:

Dim CCTotal As Integer

CCClientes.Open "select count(pkCCCod) as CCTotal.recordcount from CClientes", cnn

txtCCCod.Text = CCTotal

Mas ele sempre me retorna zero.

Grato