Ho una query con un campo che fa riferimento a una Public Function scritto così:
Città, Luogo: CittàLuogo([Città];[Luogo])
Poi ho questa
Public Function CittàLuogo(Città As String, Luogo As String) As String
Dim strCL As String
If (Città = "0") And (Len(Luogo & vbNullString) = 0) Then strCL = ""
If (Città = "0") And (Len(Luogo & vbNullString) > 0) Then strCL = Luogo
If (Città <> "0") And (Len(Luogo & vbNullString) = 0) Then strCL = Città
If (Città <> "0") And (Len(Luogo & vbNullString) > 0) Then strCL = Città & ", " & Luogo
CittàLuogo = strCL
End Function
Accade che se in Luogo vi è Null, nella query appare #Errore oppure #Tipo. Per il momento ho aggirato il problema sostituendo tutti i Null in Luogo con stringa-lunghezza-zero…ma…
Forse invece di tante If, meglio Select Case? Ma non riesco a scrivere la sintassi adeguata!
Dove sbaglio? Consigli?