acces y vba ayuda

[dactae26]

hola quiero hacer asignar querys auna variables para despues sumar los resultados y me los muestre en un label y lo hice de esta manera

Private Sub cmdsumar_Click()
Dim suma1 As Variant
Dim suma2 As Variant
Dim suma3 As Variant
Dim suma4 As Variant
Dim suma5 As Variant

suma1 = "select Count(code)FROM SPARD_MVPHNODE"
suma2 = "select count(class)FROM SPARD_MVPHNODE"
suma3 = "select count(height)FROM SPARD_MVPHNODE"
suma4 = "select count(state)FROM SPARD_MVPHNODE"
suma5 = "select count(material)FROM SPARD_MVPHNODE"

Me.lblresultado.Caption = suma1 + suma2 + suma3 + suma4 + suma5



End Sub
pero el resultado que espero es la suma de el resultado de los query y lo que me vota son lso querys anidados asi: como el boton y el label lso quierys echos todod pegados y no el resultado esperado

me pueden ayudar


gracias

[IMG]C:\Documents and Settings\Administrador\Mis documentos\Mis imágenes\query[/IMG]