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
s = "This is number 22.3"
s2 = ExtractDigits(s)
' returns s2 = "223"
|
|