12. Изучите код процедуры

13. Установите для столбца А размер шрифта 8 (меню Формат-Ячеек). Измените код процедуры таким образом, чтобы положительные числа имели размер шрифта 14, отрицательные – 12, нули – 10.

14. Проверьте работу всех кнопок.

Варианты заданий

Измените программу так, чтобы:

1. Изменение цвета шрифта не выполнялось далее 4 строки.

2. Производить поворот положительных чисел на 45 градусов (Range(“A1”).Orientation=45).

3. Изменение размера шрифта не выполнялось далее 6 строки.

4. Цвет шрифта для положительных четных и нечетных был разным.

5. Производить поворот первых 5 чисел на 45 градусов (Range(“A1”).Orientation=45).

6. Производить изменение цвета шрифта только для чисел из диапазона от -5 до 5 включительно.

7. После 5 строки размер шрифта был равен 8.

8. Отрицательные числа располагались вертикально (Range(“A1”).Orientation=90).

9. Изменение размера шрифта производилось для положительных и отрицательных чисел (исключить 0).

10. Изменялся цвет шрифта и поворот на 45 градусов положительных чисел (Range(“A1”).Orientation=45).

Задание 4

1. Самостоятельно разработайте приложение для регистрации уча­стников межвузовской конференции. Приложение запрашивает фа­милию участника, город (выбирается из списка; если нет в списке, то можно ввести в текстовом окне), должность (выбирается из списка: профессор, доцент, старший преподаватель, преподаватель, асси­стент, студент), затем из введенных данных формирует текстовую строку (например, "Иванов В.А., доцент, Хабаровск") и заносит ее в список. В приложении должна быть предусмотрена возможность удаления строки из списка. Для этого:

а) добавьте к проекту форму;

б) разместите на форме 3 элемента "Надпись", 1 элемент "Поле" (для ввода фамилии), 2 элемента "Список" (первый - для выбора должности, второй - для формирования результата - списка участников), 1 элемент "Поле со списком" (комбинированное окно для ввода или выбора города из списка) и 2 элемента "Кнопка" (первый – для занесения строки в список, второй - для удаления отмеченной строки из списка);

в) измените значения свойства Name элементов

Новые имена объектов

Имя объекта	Значение свойства Name
TextBoxl (Поле)	Textl
ListBoxl (Список)	Listl
ComboBoxl (Поле со списком)	Combo1
ListBox2 (Список)	Result

г) измените значения других свойств элементов так, чтобы форма имела вид, представленный на рисунке;

д) напишите код процедур (предусмотрите в макросе обработку следующих ситуаций: не введена фамилия; не указан город; не выбра­на в списке должность; не отмечена строка в списке при удалении);

Элемент управления ComboBox (Поле со списком) позволяет пользователю как выбирать "готовые" значения из списка, так и вводить значения самостоятельно (хотя это можно запретить). Заполнить поле со списком позициями можно с помощью метода AddItem item varIndex. Обычно он помещается в обработчик события Initialize для формы. Параметр item этого свойства представляет собой строку, добавляемую в список. Параметр varIndex может использоваться для определения положения элемента в списке. Свойство Value (или Text) позволяет программным способом установить выбранное значение в списке или вернуть выбранное/введенное пользователем значение. В обработчике события Change проверяются введенные пользователем значения и эти значения переносятся в текстовое поле или в список.

В элементе управления ListBox пользователь может выбирать не одно значение, как в ComboBox, а несколько. Он обычно используется как промежуточное средство отображения введенных/выбранных пользователем через ComboBox значений, а также как средство редактирования сформированного списка значений. Основные свойства, методы и события у ListBox — те же, что и у ComboBox. Главное отличие — то, что имеется свойство MultiSelect, которое позволяет пользователю выбирать несколько значений. По умолчанию это свойство отключено.

Для удаления пункта из списка используется метод Removeltem Index. Параметр index указывает на порядковый номер удаляемого пункта и является обязательным. Например, оператор List1.Removeltem () удаляет пункт из начала списка.

Для определения выбранного в списке номера строки используется свойство ListIndex.

Метод Clear удаляет из списка элемента все пункты. Например, List1.Clear

е) выполните запуск приложения, проверьте его работу для нескольких различных исходных данных. Текст созданных процедур приведите в отчете по лабораторной работе.