Public Function GetTokenAlphanumeric( _
ByRef rValue As Variant _
) As Variant Assuming
Dim S As String
S = " First Second Third"
for example
GetTokenAlphanumeric(S) = "First"
leaves
S = "Second Third"See also: GetTokenCharSeps Function
GetTokenNonSpace Function
GetToken FunctionrValue: The string containing the alphanumeric tokens of which the first is to be removed and returned. Function returns Null if rValue is Null or cannot be fixed up to a String. Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.