La lista di funzioni, diciamo preconfezionate, disponibili in Access è cospicua. Supponiamo, tuttavia, di avere un’esigenza particolare che ci costringa a scriverne una di sana pianta: come fare?
Esplicitiamo il nostro problema, supponiamo che in una nostra query si voglia trasformare tutti i campi in cui compare il valore “100” nella frase “Obiettivo raggiunto”.
Iniziamo creando un nuovo modulo; il codice da scrivere sarà il seguente:
Public Function ObbRag(X As Long) As String
If X = 100 Then
ObbRag = "Obiettivo raggiunto"
Else
ObbRag = "Obiettivo non raggiunto"
End If
End Function
Analizziamo il codice:
abbiamo scritto una funzione nominandola ObbRag, abbiamo deciso che analizzerà una variabile X composta da un valore numerico intero lungo, che trasformerà in testo attribuendo il valore Obiettivo raggiunto solo se il valore del campo sarà stato pari a 100.
