Вставить текст в Awesomium браузер - Visual Basic .NET

Формулировка задачи:

Вставляю текст из TextBox1.Text в текстовое поле WebControl1 (Awesomium браузер). Набираю понемногу текст в TextBox1.Text и каждый раз нажимаю кнопку, чтоб текст поставился:

                    Листинг программы
                
WebControl1.ExecuteJavascript("document.getElementById('text').value = """ & TextBox1.Text & """")

Если текста много в TextBox1.Text, то копирование не выполняется в поле WebControl1. В чем может быть причина?

Решение задачи: «Вставить текст в Awesomium браузер»

textual
                            Листинг программы 
                        
 
                        
                          
                    
    Public Function redtext(ByVal html As String) As String
        Try
            Dim dict = New Dictionary(Of String, String)
            dict.Add("""", "")                                    '   Удаляем кавычки
            dict.Add(vbCrLf, "")                                '   Удаляем переносы            
            For Each key In dict.Keys
                html = html.Replace(key, dict(key))
            Next
            '   Передаем значение вычисленное функции
            redtext = html
        Catch ex As Exception
            Return Nothing  
            MsgBox("Ошибка в функции - редактирование текста")
        End Try
    End Function