vb y postgres

[tomoe_san]

Hola!
Quisiera que me dijeran como le asigno a una variable de vb, por ejemplo el número de registros de una tabla de una base de datos en postgres. Yo lo he intentado de esta forma pero me dice que los tipos no coinciden:

Private Sub Form_Load()
Set hmConnect = New ADODB.Connection
hmConnect.ConnectionString = "driver=PostgreSQL Unicode;server=localhost;uid=Administrador;pwd=cau casia;" & _
"database=Ato;"
Dim cont As Integer
hmConnect.Open
cont = hmConnect.Execute("select count(*) from enfermedad;")
hmConnect.Close
End Sub

Les agradecería muchísimo su ayuda. Bye.