QTP截取串方法

不知道大家是否用过QTP的output vaue的方法，比如说页面出现一大堆文字然后中间有个订单号，我们可以用output value的方法把订单号输出保存到参数或变量里面，这在我之前的文章有提到过。不过有的时候我们不需要去输出值，也可以用下面的办法获取值进行计算或其他操作，用法类似于output value，只要输入字符串并给定前置字符串和后置字符串，就可以得到中间的字符串。前置字符串和后置字符串可以为""，前置为空则表示获取字符串从头开始到后置字符串之间的字符串，后置为空则获取前置字符串之后到字符串结尾。具体请看下面的代码吧。

01.'得到两个字符串中间的字符串。 02.'例如： 03.'text="人民币300元",tBefore="人民币",tAfter="元" 04.'使用between(text,tBefore,tAfter)得到300. 05.Public Function between(words,wordBefore,wordAfter) 06. t1=InStr(words,wordBefore) 07. If t1=0 Then 08. between=words 09. Else 10. L1=Len(wordBefore) 11. wordsRight=Right(words,Len(words)-t1-L1+1) 12. t2=InStr(wordsRight,wordAfter) 13. If t2=0 Then 14. wordAfter="" 15. End If 16. If wordAfter="" Then 17. t2=Len(wordsRight)+1 18. Else 19. t2=InStr(wordsRight,wordAfter) 20. End If 21. needWord=Left(wordsRight,t2-1) 22. ' needWord=Mid(words,t1+L1,t2-t1-L1) 23. between=needWord 24. End If 25.End Function