Not sure what I am doing wrong. The expression is valid, but the results are that nothing labels at all. This is the function:
Function FindLabel ( [Address], [Building], [Unit] )
If (IsNull[Unit]) And (IsNull[Building]) Then
FindLabel = [Address]
ElseIf (Not IsNull[Building]) And (IsNull[Unit]) Then
FindLabel = [Address] + vbNewLine + [Building]
ElseIf (IsNull[Building]) And (Not IsNull[Unit]) Then
FindLabel = [Address] + vbNewLine + [Unit]
End If
End Function