VB 提取某段字符之前某段文字中某个字符的问题(望各位抽空解答,感激不尽)

一段html代码中有这一段: 
1赔3.0   vip:1赔3.3 <br/> (总投注:5,总额:151金) <br/> <input   type="text"   name="tou1"   value="" 

问题:1~如何提取"3"? 
        2~如何提取金字前面的151? 

注:1赔3.0和总额:151中.3和151处的内容是变化的,动态的. --------------------编程问答-------------------- ding!希望解决! --------------------编程问答-------------------- 如果151处的内容是字符串变量的话
用left$ right$ mid$尝试一下 --------------------编程问答-------------------- 由于楼主说：“注:1赔3.0和总额:151中.3和151处的内容是变化的,动态的."
所有，我想除了楼上的提出的三个函数外，你还要用Len(str as string)函数来获取每次这段字符串是多长，从而来判断"3和151”处的内容是变化成几个字符了。
--------------------编程问答-------------------- 以后需再关注，现在先帮你顶一下

补充：VB ,  数据库(包含打印，安装，报表)