Access - do while suma

hola sigo con mi lucha con el access quiero hacer la suma de un campo que es cantidad el codigo que estoy usando es un ciclo do while que me sume desde el primer campo hasta el ultimo
seria algo asi
do while not base.eof
DIM SUMA AS INTEGER
SUMA=Suma+tabla.cantidad
base.movenext
wend
y despues asignar este valor a un campo en la tabla totales
tablatotal.totalsuma=suma
esto es posible o no , me podrian ayudar diciendome en donde esta el fallo

porque mejor no incluyes un cuadro de texto en el formulario y le asignas al origen del control =suma[cantidad], y ya despues por codigo le asignas el valor del control al campo de la tabla totales.

Saludos desde Tampico, Tamps., Mex.