Visual Basic - Quiero Sumar un Campo

Hola a todos, alguno de ustedes sabe como sumar un campo completo sin una sentencia SQL.
Hay otra manera de poder sumar un campo??

Espero me ayuden, gracias

Abierta las Base de Datos y la Tabla correspondiente seria algo así

Dim Suma as Double
Suma=0
Do Until Tabla.Eof
Suma=Suma+Tabla!Campo
Tabla.Movenext
Loop