求教:如何利用MSHTML对像获取网页中的CheckBox元素对应的文字.

Question

如题,
我想用VB写一个涵数,输入一个网址,就获取这个网页上的所有的CheckBox元素的值和对应的文字.
值有对应的对像可以获取,但是文字不知道该怎么样才能做到通用性,也就是说对各个不同的网站都有效.
另外,求书一本《Microsoft Internet Explorer 5程序设计》电子中文版.
万分感谢. 分不够可以单独再加

Answer 1

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
    Dim o
    For Each o In WebBrowser1.Document.All
        If LCase(o.tagname) = "input" Then
            If LCase(o.Type) = "checkbox" Then
                Debug.Print o.Value
            End If
        End If
    Next
End Sub

Answer 2

用Value可以取到值，但是OuterText有时候取不到文字，哪位知道怎么回事？

Answer 3

取值很简单,但是取文字不一样.
它不像VB中的控件一样有个Caption或者Text属性.楼上的也在头痛这个吗?

Answer 4

objOptionButton.parentElement.outerText这个方法倒是可以取到文字,但不够理想.

Answer 5

嗯，我也试过parentElement.outerText，但是会把一组CheckBox的文字全取到，确实不理想