Grazie della risposta, Alex;
Mi pare però che con il codice:
Me![Mese_calcolato].Value=Ucase(Format(Data,"mmmm"))
il mese reso sia quello della [Data], mentre la richiesta dell'Utente è quella di avere il mese precedente.
In realtà, escludendo le soluzioni:
1) ElseIf
2) Select Case
una soluzione analoga del tipo:
Option Compare Database
Dim Mth As Byte
Private Sub Data_AfterUpdate()
Mth = Month([Data]) - 1
If Mth = 0 Then Mth = 12
[Mese_calcolato] = UCase(Format(DateValue(Day([Data]) & " " & (Mth) & " " & Year([Data])), "mmmm"))
End Sub
mi pare risolva; rimane comunque il problema del campo calcolato.
In ogni caso grazie di avermi chiarito il concetto di Controllo all'interno del Form; era quello che mi interessava approfondire.
Buon fine settimana.