<-- Previous || Up || Next -->

Empty To Blank Function
Convert Values Class

Public Function EmptyToBlank( _
    ByVal vValue As Variant _
    ) As Variant

Replace an Empty value with a blank String.
Leave all other types of values unchanged.

       Dim varEmpty As Variant
    for example
       EmptyToBlank(varEmpty) = ""
       EmptyToBlank(EmptyValue) = ""
       IsNull(EmptyToBlank(Null)) = True
       EmptyToBlank("Word") = "Word"
       EmptyToBlank(123456) = 123456
See also:
    EmptyToNull Function
    EmptyToValue Function
    EmptyValue Property
vValue: The value which is to be changed from Empty to a blank string if appropriate. Function returns an empty String 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.