Шаг 118 - Что такое Microsoft HTML Object Library

Это библиотека, которая позволит вам добраться до HTML кода. Для использования ее нужно подключить.

gif/118_1.gif (5452 b)

Поместим на форму в добавление к прошлому проекту элемент управления список и кнопку.

gif/118_2.gif (2976 b)

К кнопке привяжем код:

Private Sub Command1_Click()
Dim a As HTMLDocument
Dim b As IHTMLElementCollection

Set a = WebBrowser1.document
Set b = a.All.tags("b")


For Each uElement In b
List1.AddItem (uElement.tagName)
Next uElement
                  
End Sub

Здесь мы получаем объект Document, в котором находится сам HTML документ, а потом из него выбираем все теги B. Запускаем смотрим.

gif/118_3.gif (2411 b)

Вот они два тега.


Предыдущий Шаг | Следующий Шаг | Оглавление
Автор Каев Артем.