51Testing软件测试论坛

标题: mid 截取判断问题忘高手指点。。。 [打印本页]

作者: Titanic8712 时间: 2010-4-12 11:05
标题: mid 截取判断问题忘高手指点。。。
Browser("网上交易系统Web版2.0 Beta版").Page("网上交易系统Web版2.0 Beta版_2").Frame("mainFrame").WebElement("可购量:123").GetROProperty("outertext")
outtertext=Browser("网上交易系统Web版2.0 Beta版").Page("网上交易系统Web版2.0 Beta版_2").Frame("mainFrame").WebElement("可购量:123").GetROProperty("outertext")
    box = Mid(outtertext,5, 3)

我要截取后面的数量然后用if判断数量大于0
  但是每次运行后可购量会变化
      忘高手指点。。。

作者: TIB 时间: 2010-4-12 11:42
可以试试下面的函数，利用了Mid函数来实现从一个字符串中查找并返回两个指定字符串之间的字符：

Function getStrBetween(Str,StartStr,EndStr)
StartStrPos = Instr(Str, StartStr)+Len(StartStr)
EndStrPos = Instr(Str,EndStr)
Length = EndStrPos - StartStrPos
Res= Mid(Str,StartStrPos,Length)
getStrBetween = Res
End Function

Str = "如何获取两个字符串之间的字符串？"
StartStr ="获取"
EndStr = "字符串"
Res = getStrBetween(Str,StartStr,EndStr)
Msgbox Res

作者: TIB 时间: 2010-4-12 11:48
或者借用一下Len函数来这样实现：
str = "可购量:123"
box = Mid(str,5,Len(str)-4)
print box

作者: Titanic8712 时间: 2010-4-12 13:41
谢谢不胜感激

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)