- •Тема: Основы программирования на vba. Создание пользовательских функций
- •Варианты практического задания №1
- •Тема: Работа со встроенными диалоговыми окнами. Стандартные функции vba
- •Варианты практического задания №2
- •Варианты практического задания №3
- •Тема: Создание приложений с помощью MacroRecorder
- •Варианты практического задания №4
- •Тема: Элементы управления и пользовательская форма
- •Варианты практического задания № 5
- •Тема: Связь полей диалоговых окон с ячейками рабочего листа Excel
- •Варианты практического задания №6 (зачетное задание)
- •Пример выполнения зачетного задания (Вариант 6)
- •Литература
Варианты практического задания №2
Ввод и вывод строки осуществляется через встроенные диалоговые окна
Вариант 1
Во введенной символьной строке удалить все цифры.
Вариант 2
Во введенной символьной строке группу символов НН заменить на группу символов Нижний Новгород.
Вариант 3
Определить, является ли введенная строка полиндромом (слово, читающееся одинаково слева направо и справа налево).
Вариант 4
Во введенной символьной строке подсчитать количество пробелов
Вариант 5
Определить, является ли введённая строка записью числа в двоичной системе счисления
Вариант 6
Определить, является ли введённая строка записью числа в шестнадцетиричной системе счисления
Вариант 7
Во введенной строке заменить группу символов ??? на символ *
Вариант 8
Во введенной строке заменить все строчные буквы на прописные и наоборот
Вариант 9
Введенная строка состоит из слов, разделённых пробелами. Удалить из неё слова на букву А.
Вариант 10
Инвертировать строчку (записать символы в обратном порядке)
Практическое задание №3 посвящено работе с функциями дат и времени
Функции даты и времени
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) |
Возвращает значение типа Date, эквивалентное дате, заданной аргументом Е, который может быть строкой, числом или константой, представляющей время |
TimeValue(E) |
Возвращает значение типа Date, содержащее время, заданное аргументом Е, который может быть строкой, числом или константой, представляющей время |
Timer |
Возвращает число, представляющее количество секунд от полуночи в соответствии с системным временем компьютера |