ExtractDigits

 Top  Previous  Next

function ExtractDigits(sSource) As String

 

Extracts all digits from the string sSource.

 

Parameters

 

•sSource ... String expression from which digits are returned.

 

Example:

Dim s, s2

 

s = "This is number 22.3"

s2 = ExtractDigits(s)

' returns s2 = "223"