Хелп! Запись в textbox1! - VB

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

Dim wrdApp As Object
Dim wrdDoc As Object

Set wrdApp = CreateObject("Word.Application")
Set wrdDoc = wrdApp.Documents.Open("\\w2kas\Moment\Events\Documents\Route_list.doc")
wrdApp.Visible = True
wrdApp.Activate
textbox1.Text = "123"

Получаю ошибку =(((
Что не так пишу?

Решение задачи: «Хелп! Запись в textbox1!»

textual
                            Листинг программы 
                        

                            Dim wrdApp As Object
Dim wrdDoc As Object
Set wrdApp = CreateObject("Word.Application")
Set wrdDoc = wrdApp.Documents.Open("\\w2kas\Moment\Events\Documents\Route_list.doc")
wrdApp.Visible = True
wrdApp.Activate
wrdDoc.FormFields("TextBox1").Result = "привет"

                        