|
Public Function IsNullEx(ValueToCheck As Variant, varWhatToReturnIfNull) As Variant
If IsNull(ValueToCheck) Then IsNullEx = varWhatToReturnIfNull Else IsNullEx = ValueToCheck End If End Function '___________________________________________________________ 'Esempio: txtClientName = IsNullEx(rst!ClientName, "unknown") |