Public Sub CatLine( _ ByRef rTo As Variant _ , ByVal vFrom As Variant _ )
CatLine S, "New" is the same as S = S & Chr$(13) & Chr$(10) & "New" or S = S & vbCrLf & "New"except that no carriage return and line feed characters are added when the target string (rTo) is empty.
Cat SubroutineSubroutine silently does nothing if both arguments (rTo and vFrom) are Null.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.