ExtractDigits

Top  Previous  Next

function ExtractDigits(sSource) As String

 

Extrahiert alle Ziffern aus dem String sSource.

 

Parameter

 

sSource ... String-Ausdruck, aus dem Ziffern extrahiert werden.

 

Beispiel:

Dim s, s2

 

= "This is number 22.3"

s2 = ExtractDigits(s)

' returns s2 = "223"