Hola,
Estoy haciendo un programa y en dicho programa necesito que al hacer click en un botón, comience a leer un MultiLine y por cada línea ejecute la acción correspondiente a ese botón. Es un botón un poco rebuscado, y así es el código:
Código vb:
Ver originalPrivate Sub GetDatesBtn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GetDatesBtn.Click
Dim allelements1 As HtmlElementCollection = WebBrowser1.Document.All
Dim PageElements As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("div")
WebBrowser1.Document.GetElementById("mat").SetAttribute("value", Matnumb.Text)
For Each webpageelement1 As HtmlElement In allelements1
If webpageelement1.GetAttribute("value") = "Datar" Then
webpageelement1.InvokeMember("click")
End If
Next
For Each CurElement As HtmlElement In PageElements
Dim GetDate As String = CurElement.GetAttribute("id")
If GetDate.Contains("datacion") = True Then
Dim innerText As String = CurElement.InnerHtml
'MessageBox.Show("Fecha:" & innerText)
TextBox3.Text = TextBox3.Text & Environment.NewLine & innerText
End If
Next
End Sub
Lo que hace el botón creo que no influye, el problema es que no sé cómo si en el MultiLine tengo 4 líneas, leer una a una metiéndola en el otro TextBox y ejecutando la acción del botón. Estoy automatizando, por así decirlo.
A ver si alguien sabe... Muchas gracias,
Un saludo.