Código
Dim elementos As HtmlElementCollection = WebBrowser1.Document.All For Each elemento As HtmlElement In elementos If elemento.GetAttribute("name") = "message" Then elemento.SetAttribute("value", TextBoxPARRAFO.Text) End If Next
código sección de escritura en la pagina web.
Código
<div class="mentions" id="u_0_5h" data-sigil="m-mentions-root" data-store-id="11"><div class="mentions-placeholder" id="u_0_5i" data-sigil="js_placeholder">Escriba algo</div><textarea class="composerInput mentions-input" aria-label="Escribe algo" rows="1" data-store="{"defaultvalue":"","initial_weak_references":[]}" data-sigil="composer-textarea m-textarea-input" data-autoid="autoid_95" data-store-id="10" id="uniqid_1" placeholder=""></textarea><input data-sigil=" mentionsHiddenInput" type="hidden" name="message" value=""><div class="mentions-shadow" aria-hidden="true" style="word-spacing;"></div></div>