Public Function DecompressString( _ ByVal vString As Variant _ ) As Variant
DecompressString(Chr$(3) + "ZYXWVU") = "ZYXWVU" DecompressString(Chr$(2) + "AB" + Chr$(255) + Chr$(5) + "CDE") = "ABCCCCCDE" DecompressString("Sample") = "Sample" ' #3See also:
CompressString Function DecompressStringLength Function RunLengthDecode Function UnsqueezeString FunctionvString: The compressed string which is to be decompressed. Function returns Null if vString is Null or cannot be fixed up to a String.
Function returns an empty string if vString is an empty string.
Function returns vString unchanged if its first character is not a valid identifier of one of the text compression techniques as in example #3.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.