Descrição:
Como somar os valores de um campo de uma Consulta e exibir o resultado em um Display?
Solução:
Para isso, deve-se utilizar a função SUM() na consulta SQL:
SELECT Sum(Campo1) as soma1
FROM TabelaDados
Depois, em um script do E3 (por exemplo, no evento Click de um botão da tela), deve-se passar o resultado da soma para o display utilizando a função GetADORecordset().
Exemplo:
' Busca um Record set na Consulta.
Set RS = Screen.Item("Consulta1").GetADORecordset()
' Associa o Display ao valor do campo de soma
Screen.Item("Texto1").Value = RS.Fields("soma1").Value
Vocês deveriam colocar umas ilustrações para ficar melhor o entendimento