Public Function EmptyToNull( _ ByVal vValue As Variant _ ) As Variant
Assuming Dim varEmpty As Variant for example IsNull(EmptyToNull(varEmpty)) = True IsNull(EmptyToNull(EmptyValue)) = True IsNull(EmptyToBlank(Null)) = True IsNull(EmptyToNull("Word")) = False IsNull(EmptyToBlank(123456)) = FalseSee also:
EmptyToBlank Function EmptyToValue Function EmptyValue PropertyvValue: The value which is to be changed from Empty to Null if appropriate. Function returns Null if vValue is an Empty Variant. Function returns vValue unchanged in all other cases.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.