Ok...ma la Label continua a rimanere vuota
code
---------------------------------------------------
Set RsTempPro = New ADODB.Recordset
RsTempPro.Open "SELECT SUM(Importo) FROM TempPro WHERE Iva=4", dB, adOpenStatic, adLockOptimistic
Set f.lblImpIva4.DataSource = RsTempPro
----------------------------------------------------
/code