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.