提取字符串中的数字

df

不行的,我是说数据不定,Val("1    3    5     5ABCD")=1355要是其它数据呢,      

df

静儿MM说得不错，就是用val最方便，Val("1    3    5     5ABCD")=1355已搞定，谢谢！

zyp

如果你要提取字符串中所有数字，而不管它位于字符串中什么位置，那么只需将情比金坚MM的函数改一下就可以了，如下 ：Function st(s As String) as String

Dim x As String

Dim y As String

Dim I as IntegerFor i = 1 To Len(s)

   x = Mid(s, i, 1)

   If InStr(1,"1234567890", x) <> 0 Then y = y & x   

Next i

st = y

End Function