Titanic8712 发表于 2010-4-12 11:05:52

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:08

可以试试下面的函数，利用了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:20

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

Titanic8712 发表于 2010-4-12 13:41:40

谢谢不胜感激
页: [1]
查看完整版本: mid 截取判断问题 忘高手指点。。。