Лабораторная работа - 5
.pdf
Лабораторный практикум по «Информатике». Разработчик: Аткина В.С.
2.Максимально упростите код макроса. Снабдите каждую строчку кода комментарием, объясняющим её смысл.
3.Запишите полученный программный код в лабораторную тетрадь.
Вариант №11
Создайте макрос, который возводит выделенное число в 9-ую степень и заменяет его на результат.
1.Используя макрорекодер или редактор сценариев VBA. Реализуйте макрос.
2.Максимально упростите код макроса. Снабдите каждую строчку кода комментарием, объясняющим её смысл.
3.Запишите полученный программный код в лабораторную тетрадь.
Вариант №12
Создайте макрос, который в начале каждой строки вордовского текста добавляет словосочетание: «Новая строка: »
1.Используя макрорекодер или редактор сценариев VBA. Реализуйте макрос.
2.Максимально упростите код макроса. Снабдите каждую строчку кода комментарием, объясняющим её смысл.
3.Запишите полученный программный код в лабораторный журнал.
Вариант №13
Создайте макрос, удваивающий выделенный текст: Конфиденциальность -
КонфиденциальностьКонфиденциальность
1.Используя макрорекодер или редактор сценариев VBA. Реализуйте макрос.
2.Максимально упростите код макроса. Снабдите каждую строчку кода комментарием, объясняющим её смысл.
3.Запишите полученный программный код в лабораторную тетрадь.
Вариант №14
Создайте макрос, перекрашивающий все буквы, а в документе в красный цвет, б – в жёлтый. Д в зелёный.
1.Используя макрорекодер или редактор сценариев VBA. Реализуйте макрос.
2.Максимально упростите код макроса. Снабдите каждую строчку кода комментарием, объясняющим её смысл.
3.Запишите полученный программный код в лабораторную тетрадь.
Лабораторный практикум по «Информатике». Разработчик: Аткина В.С.
IV. Контрольные вопросы
1.Понятие макроса
2.Область применения макросов
3.Методы создания макроса
4.Методика работы с центром управления безопасностью
5.Редактор Visual Basic
6.Этапы создания макроса
7.Макрорекордер
8.Особенности и правила создания макросов.
9.Диалоговое окно «Запись макроса»
10.Влияние макросов на безопасность.
11.Назовите и опишите функциональное назначение параметров макросов в центре управления безопасностью.
V. Правила выполнения.
Отчет по выполненной лабораторной работе оформляется письменно в тетради и должен содержать:
1.Номер лабораторной работы.
2.Тему.
3.Цель.
4.Полные ответы на контрольные вопросы.
5.Файл-отчет с результатами выполненных практических заданий.
Лабораторный практикум по «Информатике». Разработчик: Аткина В.С.
Приложение 1 Функции языка VBA
Математические функции
N - означает любое численное выражение. Все аргументы функций являются обязательными, если не указано иначе.
Функция (аргумент)
Abs(N)
Atn(N)
Cos(N)
Exp(N)
Fix(N)
Int(N)
Log(N)
Rnd(N)
Sgn(N)
Sin(N)
Sqr(N)
Tan(N)
Действие
Возвращает абсолютное значение аргумента N
Возвращает арктангенс N (радиан)
Возвращает косинус N (радиан)
Возвращает константу е (натуральный логарифм = 2.718282...), возведенную в степень N
Возвращает целую часть N. Не округляет число, а отбрасывает любую дробную часть. Если N отрицательное число, то возвращается ближайшее отрицательное целое большее, чем или равное N
Возвращает целую часть N. Не округляет число, а отбрасывает любую дробную часть. Если N отрицательное число, то возвращается ближайшее отрицательное целое меньшее, чем или равное N
Возвращает натуральный логарифм N
Возвращает случайное число: аргумент является необязательным. Используется только после инициализации генератора случайных чисел
(оператор Randomize)
Возвращает знак числа: -1, если N - отрицательное; 1, если N - положительное; 0, если N равно 0
Возвращает синус N (радиан)
Возвращает корень квадратный из N. Если N является отрицательным числом - возвращается ошибка времени исполнения
Возвращает тангенс N (радиан)
Функции преобразования данных
N - любое численное значение; S - любое строковое значение; E - выражение любого типа. Аргументы каждой функции являются обязательными, если не указано иначе.
Лабораторный практикум по «Информатике». Разработчик: Аткина В.С.
Функция (аргумент)
Asc(S)
Chr(N)
Format(E,S)
Hex(N)
Oct(N)
RGB(N,N,N)
Str(N)
Val(S)
CBool(N)
CByte(E)
CCur(E)
CDate(E)
CDbl(E)
CInt(E)
CLng(E)
CSng(E)
Действие
Возвращает число кода символа, соответствующее первой букве строки S
Возвращает строку из одного символа, соответствующего коду символа N, который должен быть числом между 0 и 255 (обратна предыдущей)
Возвращает строку, содержащую значение, представленное выражением Е, в формате в соответствии с инструкциями, содержащимся в S
Возвращает строку, содержащую шестнадцатиричное представление N
Возвращает строку, содержащую восьмиричное представление N
Возвращает целое типа Long, представляющее значение основных цветов изображения. N для каждого аргумента должно быть целым и лежать в пределах от 0 до
255
Возвращает строку, эквивалентную численному выражению N
Возвращает численное значение, соответствующее числу, представленному строкой S, которая должна содержать только цифры и одну десятичную точку, иначе возвращается 0
Возвращает Boolean-эквивалент численного выражения N
Возвращает численное значение типа Byte (от 0 до 255). Е - любое допустимое численное или строковое выражение, которое может быть преобразовано в число
Возвращает численное значение типа Currency. Е - любое допустимое численное или строковое выражение, которое может быть преобразовано в число
Возвращает значение типа Date. E может быть любым допустимым выражением (строкой или числом), представляющим дату в диапазоне 1/1/100 - 12/31/9999
Возвращает численное значение типа Double. Е - любое допустимое численное или строковое выражение, которое может быть преобразовано в число
Возвращает численное значение типа Integer. Е - любое допустимое численное или строковое выражение, которое может быть преобразовано в число
Возвращает численное значение типа Long. Е - любое допустимое численное или строковое выражение, которое может быть преобразовано в число
Возвращает численное значение типа Single. Е -
Лабораторный практикум по «Информатике». Разработчик: Аткина В.С.
CStr(E)
CVar(E)
любое допустимое численное или строковое выражение, которое может быть преобразовано в число
Возвращает численное значение типа String. Е - любое допустимое численное или строковое выражение, которое может быть преобразовано в число
Возвращает численное значение типа Variant. Е - любое допустимое численное или строковое выражение, которое может быть преобразовано в число
Функции даты и времени.
N - любое допустимое численное значение; D - любое допустимое выражение типа Date (либо выражение, которое может быть преобразовано к типу Date). Аргументы каждой функции являются обязательными, если не указано иначе.
|
|
|
Функция |
Действие |
|
(аргумент) |
||
|
||
|
|
|
Date |
Возвращает системную дату |
|
|
|
|
Time |
Возвращает системное время |
|
|
|
|
Now |
Возвращает системные дату и время |
|
|
|
|
|
Возвращает целое, являющееся частью выражения |
|
Year(D) |
типа Date и содержащее год. Год возвращается как число |
|
|
между 100 и 9999 |
|
|
|
|
|
Возвращает целое, являющееся частью выражения |
|
Month(D) |
типа Date и содержащее месяц. Месяц возвращается как |
|
|
число между 1 и 12 |
|
|
|
|
|
Возвращает целое, являющееся частью выражения |
|
Day(D) |
типа Date и содержащее день. День возвращается как |
|
|
число между 1 и 31 |
|
|
|
|
|
Возвращает целое, являющееся частью выражения |
|
Weekday(D) |
типа Date и содержащее день недели. День недели |
|
|
возвращается как число между 1 и 7 (1 - воскресенье..) |
|
|
|
|
|
Возвращает целое, содержащее часы как часть |
|
Hour(D) |
времени, содержащегося в выражении типа Date. Часы |
|
возвращаются как число между 0 и 23. Если аргумент не |
||
|
||
|
содержит значения времени, то возвращается 0 |
|
|
|
|
|
Возвращает целое, содержащее минуты как часть |
|
Minute(D) |
времени, содержащегося в выражении типа Date. Минуты |
|
возвращаются как число между 0 и 59. Если аргумент не |
||
|
||
|
содержит значения времени, то возвращается 0 |
|
|
|
|
Second(D) |
Возвращает целое, содержащее секунды как часть |
|
времени, содержащегося в выражении типа Date. Секунды |
||
|
||
|
|
Лабораторный практикум по «Информатике». Разработчик: Аткина В.С.
возвращаются как число между 0 и 59. Если аргумент не содержит значения времени, то возвращается 0
Возвращает значение последовательной даты для
DateSerial(N,N,N) заданной даты. Слева направо аргументы представляют год (целое число от 100 до 9999), месяц (от 1 до 12) и день
(от 1 до 31)
Возвращает значение последовательного времени. TimeSerial(N,N,N) Слева направо аргументы представляют часы (целое число
от 0 до 23), минуты (от 0 до 59) и секунды (от 0 до 59)
DateValue(E)
TimeValue(E)
Timer
Возвращает значение типа Date, эквивалентное дате, заданной аргументом Е, который может быть строкой, числом или константой, представляющей время
Возвращает значение типа Date, содержащее время, заданное аргументом Е, который может быть строкой, числом или константой, представляющей время
Возвращает число, представляющее количество секунд от полуночи в соответствии с системным временем компьютера
Строковые функции
N - любое допустимое численное значение; S - любое допустимое строковое значение. Аргументы каждой функции являются обязательными, если не указано иначе.
Функция (аргумент)
InStr(N1,S1,S2,N2)
Lcase(S)
Left(S,N)
Len(S)
Ltrim(S)
Mid(S,N1,N2)
Действие
Возвращает положение S2 в S1. N1 - начальное положение для поиска. N2 определяет, следует ли выполнять поиск с учетом регистра. N1, N2 - необязательные аргументы
Возвращает строку (тип String), содержащую копию S со всеми символами верхнего регистра, преобразованными в символы нижнего регистра
Возвращает строку: копирует N символов из S, начиная с левого крайнего символа S
Возвращает число символов в S, включая начальные и конечные пробелы
Возвращает копию строки S после удаления символов пробела из левой части строки (начальные пробелы)
Возвращает строку: копирует N2 символов из S, начиная с позиции символа в S, заданной аргументом N1. N2 - необязательный аргумент, если он опущен, то возвращаются все символы в строке S
Лабораторный практикум по «Информатике». Разработчик: Аткина В.С.
Right(S,N)
Rtrim(S)
Space(N)
StrComp(S1,S2,N)
StrConv(S,N)
String(N,S)
Trim(S)
Ucase(S)
от позиции N1 до конца строки
Возвращает значение типа String: копирует N символов из S, начиная с правого крайнего символа S
Возвращает копию строки S после удаления символов пробела из правой части строки (конечные пробелы)
Возвращает строку пробелов длиной N символов
Сравнивает S1 с S2 и возвращает число, обозначающее результат сравнения: -1, если S1<S2; 0 - S1=S2; 1 - S1>S2. N является необязательным аргументом и указывает следует ли выполнять сравнение с учетом регистра
Возвращает строку, преобразованную в новую форму в зависимости от числового кода, заданного аргументом N. VBA предоставляет внутренние константы для использования с функцией StrConv. Наиболее полезными являются: vbProperCase (преобразует строку так, что каждая буква, начинающая слово, становится заглавной), vbLowerCase (преобразует строку в буквы нижнего регистра) и vbUpperCase (преобразует строку в буквы верхнего регистра)
Возвращает строку длиной N символов, состоящую из символа, заданного первым символом в S
Возвращает копию строки S после удаления начальных и конечных символов пробела из этой строки
Возвращает S со всеми символами нижнего регистра, преобразованными в символы верхнего регистра