Como puedo ejecutar en un command un comando en sql??

LIZaRdF
26 de Enero del 2005
Tengo un command y quiero que al presionarlo me ejecute la funcion sum(campo) from tabla y ese resultado de la suma me aparesca en un text.

MI base de datos esta en ACCESS y la coneccion es JET.

la base de datos la abro cuando ejecuto el form asi

Set vdb = OpenDatabase("ubicacion dela base de datos")
Set vtb = vdb.OpenRecordset("nombre tabla")

y las variables vdb y vtb las asigno al principio del codigo con un dim vdb as database y dim vtb as recordset

NECESITO EJECUTAR ESTO PORFAVOR RUEGO POR AYUDA

DESDE YA MUCHISIMAS GRACIAS

LIZaRdF®

mvallejos
26 de Enero del 2005
Dim R As DAO.Recordset
Dim Sql As String

sql = "Select Sum(Campo) as Total From Tabla"
Set R = vdb.Openrecordset(Sql,dbopenstatic)
Text1.Text = R!Total
R.Close

Donde Campo se reemplaza por el verdadero nombre del campo que querés sumar y Tabla por el verdadero nombre de la tabla

Saludos