Текстовый редактор MS Word + задача

Например, если при создании документа часто используется одна и та же фраза, то, создав элемент Автотекста, для ее ввода станет достаточно набрать имя этого элемента в документе и нажать клавишу “F3”;
Поле – позволяет добавить поле. Поля - специальные коды, помещаемые в документ и дающие команду текстовому процессору поместить некоторую информацию в то место, где находится само поле. С помощью полей можно добавлять и автоматически обновлять текст, графические объекты, номера страниц и другую информацию в документе (например, поле DATE помещает текущую дату каждый раз, когда документ выводят на печать). Когда в документ помещают поле, в текст документа вставляется его код. На рис.2 приведен пример кода поля, осуществляющего вставку в активный документ текста из файла document1.doc из каталога C:\Мои документы\WORD.;
Символ – позволяет добавить символ, который присутствует в шрифтовом наборе, но отсутствует на клавиатуре;
Примечание – позволяет добавить примечание к выделенному объекту;
Ссылка - – позволяет создать сноску, добавить название к рисунку или таблице, создать перекрестную ссылку и оглавление;
Рисунок – позволяет добавить графическое изображение;
Схематическая диаграмма – позволяет добавить схематическую диаграмму;
Надпись – позволяет добавить текст работа, с которым осуществляется, как с графическим объектом;
Файл – позволяет добавить содержимое текстового файла;
Объект – позволяет добавить объект из файла или создать новый, с использованием механизма OLE (связывание и внедрение объектов);
Закладка – позволяет использовать закладки для создания легкодоступных разделов в документе;
Гиперссылка – позволяет добавить гиперссылку на объект расположенный в нутрии документа, на локальном компьютере или в сети.

Работа с одномерным массивом
Постановка задачи
Вычислить квадратный корень из суммы квадратов чётных элементов одномерного массива
Анализ задачи
Анализ постановки задачи показывает, что в алгоритме задачи должны быть элементы циклической и разветвляющейся структур. Исходные данные – размерность массива n и значения элементов массива A(n). Результирующие данные –квадратный корень из суммы квадратов чётных элементов – sqr.

Схема алгоритма

Листинг программы
Public Class Form1
Dim mas() As Integer, N As Integer
'обьявление глобальных массивов mas() и переменной N целочисленного типа

Private Sub ВводМассива_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ВводМассива.Click
Dim i As Integer 'обьявление переменной i целочисленного типа
N = Val(TextBox1.Text) 'инициализация глобальной переменной N значением текстового поля TextBox1
ReDim mas(N) 'обьявление массива mas() из N элементов
TextBox2.Text = "" 'очистка информации о предыдущем массиве
For i = 1 To N
mas(i) = Val(InputBox("Введите " & i & " элемент массива:", "Ввод массива")) 'ввод значеий элементов
TextBox2.Text = TextBox2.Text & "mas(" & i & ")=" & mas(i) & " " 'вывод значения mas(i)
Next i
TextBox3.Text = "" 'очистка предыдущих результатов
End Sub

Private Sub Вычислить_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Вычислить.Click
Dim i As Integer, sqr As Double, sum As Double 'обьявление переменных sqr и sum типа Double
sum = 0
For i = 1 To N
If mas(i) Mod 2 = 0 Then sum = sum + mas(i) ^ 2
'проверка текущего элемента массива на четность, если четный, то возвести в квадрат и прибавить к сумме
Next i
sqr = sum ^ 0.5 'вычесление корня квадратного из суммы квадратов четных элементов
TextBox3.Text = sqr 'вывод результата
End Sub

Private Sub Выход_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Выход.Click
End 'выход
End Sub
End Class

Результаты решения

Рисунок 3. Окно программы при запуске


Рисунок 4. Окно ввода элементов массива

Рисунок 5. Окно программы после ввода элементов массива

Рисунок 6. Окно программы после нажатия кнопки вычислить
СПИСОК ЛИТЕРАТУРЫ

Власенко С.Ю. Microsoft Word 2002. БХВ-Петербург, 2002. 992 с.
Жарков В.А. Visual Basic 2008  в учебе, науке и технике.  Жарков Пресс, 2008. 822с.
Новиков Ф.А., Яценко А.Д. Microsoft Office XP в целом. БХВ-Петербург, 2002. 928 с.
Симонович С.В.Общая информатика. Питер, 2007 г. 432 с.
Щипин Ю.К., Телепин  А.М. Информатика для гуманитарных вузов. Феникс. 2004 г. 437 с.
О закладках будет рассказано в разделе «Использование закладок и перекрестных ссылок» на стр.41.









Текстовый редактор MS Word

3

Текстовый редактор MS Word

4

Вопрос 8



Работа с одномерным массивом

Работа с одномерным массивом











Рисунок 2. Пример кода поля, осуществляющего вставку в активный документ текста другого документа

Инструкции по действию поля

Тип поля - определяет поле и его действие

Символы поля



Рисунок 1. Кнопки для выравнивания абзацев

По правому краю

Ввод mas(i)

По ширине

По левому
краю



По центру















sum = 0

mas(i) mod 2

i: 1, n, 1

i: 1, n, 1

Ввод n

НАЧАЛО



sqr=sum^0.5

sum = sum+mas(i)^2

Вывод sqr

да

КОНЕЦ

{INCLUDETEXT C:\\Мои документы\WORD\document1.doc}

Влево По центру Десятичное Вправо
123.4 123.4 123.4 123.4
98.65 98.65 98.65 98.65
4.532 4.532 4.532 4.532
Рисунок 5. Типы табуляции