vb 中小弟我只想截取字符串中的数字

vb 中我只想截取字符串中的数字
譬如字符串是“¥123,45.00”
我现在要截取得到12345.可是现在用Mid(“¥123,45.00”, InStr(a, "¥") + 1)只能截取到123.遇到逗号就停止了,请求大家帮帮忙吧!先谢了

------解决方案--------------------
right("¥123,45.00",len("¥123,45.00")-1)
------解决方案--------------------
Replace(Mid(a, 2, InStr(1, a, ".") - 2), ",", "")
------解决方案--------------------
自己写一个类似replace的函数,把不是 .和数字的都替换为空
------解决方案--------------------
你的代码页有点乱,给你改一下:
a="¥123,45.00"
Mid(a, InStr(1,a, "¥") + 1)
------解决方案--------------------
哪用得着那么复杂啊 直接 aa = Format("¥123,45.00", "0") 不就好啦!!