Congratulations to Rossy65: The points contest for March is complete, and Rossy65 has won the Amazon gift card. Participate in the April contest, and win the next prize! See the Leaderboard for more info.
Ever wanted to grab all the digits out of a string? This handy little function will do it. Not sure what purpose this would server, but someone requested it, so here it is.
For example, if you have a string value that contains "My n4me3 1s J0e", this function will return a string value containing "4310".
dim strOutput, strDigit, intKount
strOutput = ""
for intKount = 1 to Len(value)
strDigit = Mid(value, intKount, 1)
if (Asc(strDigit) >= Asc("0")) and (Asc(strDigit) <= Asc("9")) then
strOutput = strOutput & strDigit
GetDigits = strOutput
dwirch has posted a total of 159 articles.
No comments on this post yet!
Do you have a thought relating to this post? You can post your comment here. If you have an unrelated question, you can use the Q&A section to ask it.
Or you can drop a note to the administrators if you're not sure where you should post.