html get elements dropdownlist vbnet

Question

Я пытаюсь собрать все элементы раскрывающегося списка html и поместить их в свой combobx в vbet, но я получаю сообщение об ошибке, которое было вне диапазона. Я проверил идентификатор выпадающего списка, но верно.

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click 
    Dim I As Integer = 0 
    Dim NAME As String 


    NAME = WebBrowser1.document.GetElementById("ID").GetAttribute("pt1:r1:0:soc2::content").GetAttribute("value").ElementAt(I) 
    ComboBox1.Items.Add(NAME) 
    MessageBox.Show(NAME) 



End Sub 

Любая помощь будет принята за благодарность.

Answer 1

Я написал этот код сейчас и все работает отлично.

надеюсь, что это помогает:

For Each elem In WebBrowser1.Document.GetElementById("pt1:r1:0:soc2::content").Children 
    ComboBox1.Items.Add(WebBrowser1.Document.Body.AppendChild(elem).InnerText) 
    MessageBox.Show(WebBrowser1.Document.Body.AppendChild(elem).InnerText) 
Next 

Джонатан