No me Funciona...
les pego el code..
Option Explicit
' declaramos una variable de alcance publico de tipo DataBase
Dim Base As Database
' declaramos una variable de alcance publico de tipo Recordset
Dim Tabla As Recordset
Private Sub Form_Load()
On Error GoTo Error:
' varible de tipo set que guarda la direccion de la base de datos
Set Base = OpenDatabase(App.Path & "\\Base1.mdb")
'varible de tipo set que abre la tabla en modo lectura - escritura
Set Tabla = Base.OpenRecordset("economia", dbOpenTable)
Label4 = SELECT SUM(ValorI)FROM Tabla
Label5 = 50
Label6 = Label5 - Label4
Exit Sub
Error:
MsgBox "Error : " & Err.Description
Resume Next
End Sub
COMO LO HAGO PARA QUE EN EL LABEL4 MUESTRE LA SUMA DE TODOS LOS CAMPOS !VALORI ???
GRACIAS:...