Si ho provato, ma il textbox rimane vuoto. Ovviamente il recordset.fields("somma") fa riferimento a AS SOMMA della quesry. Credo che vi riferite a quello..... o no! E quindi ho aggiunto la riga di gibra:

[code]
myQuery_S = "SELECT SUM(importo) AS SOMMA FROM mov WHERE codice = " & Chr(39) & identifica & Chr(39) & ""
vismov.Adodc2.RecordSource = myQuery_S
vismov.Adodc2.Refresh
vismov.spesa.Text = Adodc2.Recordset.Fields("SOMMA").Value
[\code]

ma non sarebbe più semplice un comando per sommare un'intera colonna in un dataGrid?
Magari risolvo!