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