Question

vb提取字符串中部分内容的问题

Sub text()
Dim str1 As String
str1="{"lgin":true,"sign":"06D","qst":"http://aa.cn/tfm/FX","stock":111,"now":15411,"tip":"\u4F18","len":10}"
End Sub
以上字符串是我用WebBrowser1.Document.body.innerTEXT提取到的，现在我想提取出"http://aa.cn/tfm/FX"这个字段，用mid的话，确定开始字符与长度很麻烦，因为里面的各个字段的长度都不是固定的。我本想用split看看，没想到现在赋值到str1都不能。

请问：
1、像这种字符串怎么付给变量str1？
2、有什么好办法提取出我要的内容？
谢谢大家

Answer 1

你试一试用下面的语句，能够拆分：
Str1 = "lgin,true,sign,06D,qst,http://aa.cn/tfm/FX,stock,111,now,15411,tip,\u4F18,len,10"
S = Split(Str1, ",")
他可以拆分成：

lgin
true
sign
06D
qst
http://aa.cn/tfm/FX
stock
111
now
15411
tip
\u4F18
len
10
其中第六个就是你要的变量。

追问

问题是我截取到的WebBrowser1.Document.body.innerTEXT是：

{"lgin":true,"sign":"06D","qst":"http://aa.cn/tfm/FX","stock":111,"now":15411,"tip":"\u4F18","len":10}

呀，有大括号怎么办呀

追答

哦，首先看你提取的这一大串东西是怎么看到的？
如果是在text中，那么就用类似str1=text1.text这样的语句把它赋值给一个变量，看能不能成功。如果不能赋值给变量，其它的好像都做不成。后面再说大括号的问题吧。