如何取得WebBrowser打开的网页中的标签中显示的内容

[xksyhjb]

用WebBrowser打开一个网页，网页内有如下span标签内容：
<span id="tbdes" class="zy" style="height:280px;width:96px;Z-INDEX: 107; LEFT: 440px;

POSITION: absolute; TOP: 64px">这里就是要取的内容</span>

现在我要取得“这里就是要取的内容”句话，我用
WebBrowser1.oleobject.document.all.item('tbdes', 0).value取不到
请大家帮帮我，如何才能取到。

[常愿]

Public Function getWebContent(browser As WebBrowser) As String
Dim doc As Object
Dim ii As Object
Dim strHtml As String

Set doc = browser.Document
For Each ii In doc.All
strHtml = strHtml & Chr(13) & ii.innerText
Next
getWebContent = strHtml
End Function