1. Откройте приложение Word, сохраните документ и перейдите в редактор VBA.
2. Создайте форму аналогично приведенному рис. 29.
3. Пропишите обработчик события кнопки ОК.
Рис. 29.Форма примера 13 в режиме конструктора и в рабочем состоянии
Private Sub CommandButton1_Click()
Dim a As String
Dim b As String
Dim c As String
Dim k As String
Dim d As String
DimNAs Integer
a = TextBox1.Text
N= Len(a)
Label7.CaptioN= «длина первой строки равна» &N& « символам»
c = TextBox3.Text
k = Ucase(с)
Label8.CaptioN= k
b = TextBox2.Text
d = a + " " + b
Label9.CaptioN= d
End Sub
4. Откомпилируйте программу.
5. Запустите форму на выполнение.
