- •Кафедра учета, анализа и аудита
- •Часть 1
- •2. Типы пользовательских интерфейсов
- •Справочная информация
- •Обучающее задание
- •Самостоятельное задание и контрольные вопросы
- •3. Основы работы с объектами Windows. Работа с окнами, курсором, меню
- •Справочная информация
- •Обучающее задание
- •Самостоятельное задание и контрольные вопросы
- •5. Основы работы с объектами Windows. Работа со справочной системой
- •Справочная информация
- •Обучающее задание
- •Самостоятельное задание и контрольные вопросы
- •9. Антивирусные программы и работа с ними
- •Справочная информация
- •Обучающее задание
- •Самостоятельное задание и контрольные вопросы
- •10. Архиваторы и работа с ними
- •Справочная информация
- •Обучающее задание
- •Самостоятельное задание и контрольные вопросы
- •11. Утилиты и работа с ними
- •Справочная информация
- •Обучающее задание
- •Самостоятельное задание и контрольные вопросы
- •12. Субд ms Access. Создание таблиц и схем данных
- •Справочная информация
- •Обучающее задание
- •Самостоятельное задание и контрольные вопросы
- •13. Субд ms Access. Разработка запросов к базе данных
- •Справочная информация
- •Обучающее задание
- •Самостоятельное задание и контрольные вопросы
- •14. Субд ms Access. Конструирование экранных форм для работы с данными
- •Справочная информация
- •Обучающее задание
- •Самостоятельное задание и контрольные вопросы
- •15. Субд ms Access. Конструирование отчетов и публикация данных
- •Справочная информация
- •Обучающее задание
- •Самостоятельное задание и контрольные вопросы
- •16. Субд ms Access. Автоматизация приложения средствами макросов и модулей vba
- •Справочная информация
- •Обучающее задание
- •Самостоятельное задание и контрольные вопросы
- •Основная и дополнительная литература
- •1. Основная литература
- •2. Дополнительная литература
- •Приложение 1 Структура Учебной базы данных
Самостоятельное задание и контрольные вопросы
Создайте подобные модули и макросы для личной базы данных (см. Задание №2 на самостоятельную работу).
Представьте результаты их работы преподавателю и скопируйте личную базу данных на дискету, предварительно выполнив ее сжатие и, в случае необходимости, архивирование.
Назовите основные объекты, с которыми Вы работали при выполнении обучающего и самостоятельного заданий.
Какие выражения VBA были использованы Вами при создании модулей и макросов в учебной и личной базе данных? Что означают эти выражения?
Литература
Основная и дополнительная литература
1. Основная литература
1.1. |
Бойс Д. Осваиваем Windows 95 (русская версия). - М.: Бином, 1997. -416 с. |
1.2. |
Вейскас Дж. Эффективная работа с Microsoft Access 2000. – СПб.: Питер, 2001. – 1040 с. |
1.3. |
Павлова Н.Г., Румянцев С.С., Сивоволов П.Н. Практикум по вычислительной технике. Метод. указания.- Н.Новгород: ВГАВТ, 2000. |
1.4. |
Павлова Н.Г., Румянцев С.С., Соловьева В.Г. Проектирование базы данных. Метод. указания.- Н.Новгород: ВГАВТ, 2001. |
1.5. |
Пайк М. Internet в подлиннике. - СПб, BHV-Санкт-Петербург, 1997. - 640 с. |
1.6. |
Симонович С. Windows 98: Учебный курс. - СПб,: ПитерКом, 1999. - 508 с. |
1.7. |
Фигурнов В.Э. IBM PC для пользователя: Краткий курс. 7-е изд. -М.: Инфо-М., 1999. - 479 с. |
1.8. |
Экономическая информатика /Под ред. П.В.Конюховского и Д.Н.Колесова. – СПб.: Питер, 2000. – 560 с. |
2. Дополнительная литература
2.1. |
Симонович С.В., Евсеев Г.А., Алексеев А.Г. Windows: Лаборатория мастера: Практическое руководство по эффективным приемам работы с компьютером. – М.: АСТ-ПРЕСС:Информком-Пресс, 2001. –656 с. |
2.2. |
Пасько В. Access 2000 (русифицированная версия). – К.:Издательская группа BHV, 1999. – 384 с. |
2.3. |
Сагман С.В. Microsoft Windows. Проблемы и решения: Практ. пособ. /Пер. с англ. – М.: Издательство ЭКОМ, 2001. –432 с. |
2.4. |
Нортон П., Мюллер Дж. Windows 98: Пер. с англ. – СПб.: БХВ-Петербург, 2001. –598 с |
2.5. |
Краммеш К. Word 7.0 для занятых. - СПб.: Питер, 1997. - 320 с. |
2.6. |
Комягин В.Б. Программирование Excel 5.0 и Excel 7.0 на языке Visial Basic.- М.: Радио и связь, 1997. |
2.7. |
Чернин А.Э., Компьютерные сети для пользователя Microsoft Windows 95: Начальный курс. - М.: “Русская редакция”, 1997. - 96 с. |
Приложение 1 Структура Учебной базы данных
Имя поля |
Тип данных |
Размер поля |
Формат поля |
Маска ввода |
Условие на значение |
Обя-зат. поле |
Пус-тые стро-ки |
Индексиров. поле (совпадения) |
Примечание |
Таблица Специальность
|
|||||||||
КодСпециальности |
Текстов. |
1 |
|
>L |
In ("М";"У";"Ф";"Э") |
Да |
Нет |
Да (не допускаются) |
Ключевое поле |
НомерСпециальности |
Текстов. |
4 |
|
0000 |
In("0604";"0605"; "0608";"0611") |
Да |
Нет |
Нет |
|
НаименованиеСпециальности |
Текстов. |
50 |
|
|
|
Да |
Нет |
Нет |
|
Таблица Дисциплины
|
|||||||||
КодДисциплины |
Текстов. |
9 |
|
|
|
Да |
Нет |
Да (не допускаются) |
Ключевое поле |
НаименованиеДисциплины |
Текстов. |
100 |
|
>L<??(99 раз) |
|
Да |
Нет |
Нет |
|
Таблица Преподаватели
|
|||||||||
КодПреподавателя |
Счетчик |
Длинное целое |
|
0000 |
|
Да |
Нет |
Да |
Ключевое поле |
Фамилия |
Текстов. |
20 |
|
>L<?(19 pаз) |
|
Да |
Нет |
Нет |
|
Имя |
Текстов. |
10 |
|
>L<?(9 раз) |
|
Нет |
Нет |
Нет |
|
Отчество |
Текстов. |
20 |
|
>L<?(19 pаз |
|
Нет |
Нет |
Нет |
|
Таблица Студенты
|
|||||||||
КодСтудента |
Текстов. |
5 |
|
00000 |
|
Да |
Нет |
Да (не допускаются) |
Ключевое поле |
Фамилия |
Текстов. |
20 |
|
>L<? (19 раз) |
|
Да |
Нет |
Да (допускаются) |
|
Имя |
Текстов. |
10 |
|
>L<?(9 pаз |
|
Нет |
Нет |
Нет |
|
Отчество |
Текстов. |
20 |
|
>L<?(19 pаз |
|
Нет |
Нет |
Нет |
|
ДатаРождения |
Дата |
|
Краткий формат |
00.00.00; 0;# |
<Date() |
Нет |
|
Нет |
|
Адрес |
Текстов. |
255 |
|
|
|
Нет |
Нет |
Нет |
|
КодСпециальности |
Текстов. |
1 |
|
>L |
In ("М";"У";"Ф";"Э") |
Да |
Нет |
Да (не допускаются) |
Подстановка из табл.Специ альность |
Курс |
Целое |
|
|
0 |
|
Да |
|
Нет |
Подстановка из списка |
Группа |
Целое |
|
|
|
|
Да |
|
Нет |
Подстановка из списка |
Подгруппа |
Целое |
|
|
|
|
Да |
|
Нет |
Подстановка из списка |
Таблица Результаты
|
|||||||||
КодРезультата |
Счетчик |
Длинное целое |
|
|
|
Да |
Нет |
Да (не допускаются) |
Ключевое поле |
КодСтудента |
Текстов. |
5 |
|
00000 |
|
Да |
Нет |
Да (не допускаются) |
Подстановка из табл. Студенты |
КодДисциплины |
Текстов. |
9 |
|
|
|
Да |
Нет |
Да (не допускаются) |
Подстановка из табл. Дисциплины |
КодПреподавателя |
Числовой |
Длинное целое |
|
0000 |
|
Нет |
|
Да (допускаются) |
Подстановка из табл.Пре- подаватели |
ДатаСдачи |
Дата |
|
Краткий формат |
00.00.00;0;# |
|
Нет |
|
Нет |
|
Результат |
Текстов. |
1 |
|
>& |
In(“5”;”4”;”3”;”2”; ”+”;”-“;”П”) |
Нет |
Нет |
Нет |
Подстановка из списка |
Приложение 2
Связи между таблицами Учебной базы данных
Приложение 3
Пример запроса «Студенты по специальности»
Приложение 4
Пример запроса «Не сдали сессию»
Приложение 5
Пример запроса «Результаты студента»
Приложение 6
Пример формы «Студенты»
Приложение 7
Пример кнопочной формы «Заставка»
Приложение 8
Пример отчета «Не сдали сессию»
Приложение 9
Пример отчета «Возраст студентов»
Приложение 10
Функции и операторы VBA и MS Access
Математические функции |
|
Функция |
Возвращаемое Значение |
Abs (числовое выражение) |
Модуль (абсолютная величина) числа |
Atn (числовое выражение) |
Арктангенс |
Cos (числовое выражение) |
Косинус |
Exp (числовое выражение) |
Экспонента, т.е. результат возведения основания натурального |
Log (числовое выражение) |
Натуральный логарифм |
Rnd (числовое выражение) |
Случайное число из интервала [0,1). Если число меньше нуля, то Rnd возвращает каждый раз одно и то же число, используя аргумент в качестве опорного числа; если число больше нуля или аргумент опущен, то - следующее случайное число в последовательности; если число равняется нулю, то - случайное число, возвращённое при предыдущем вызове этой функции. Перед вызовом функции Rnd используйте инструкцию Randomize без аргумента. |
Sgn (числовое выражение) |
Знак числа |
Sin (числовое выражение) |
Синус |
Sqr (числовое выражение) |
Квадратный корень из числа |
Tan (числовое выражение) |
Тангенс |
Fix (числовое выражение) и Int (числовое выражение) |
Обе функции, Int и Fix, отбрасывают дробную часть числа и возвращают целое значение. Различие между функциями Int и Fix состоит в том, что для отрицательного значения аргумента число функция Int возвращает ближайшее отрицательное целое число, меньшее либо равное указанному, а Fix - ближайшее отрицательное целое число, большее либо равное указанному. |
Функции проверки типов |
|
Функция |
Проверка |
IsArray (переменная) |
Возвращает True – если переменная типа Variant является массивом и False в противном случае |
IsDate (Выражение) |
Возвращает True – если Выражение является датой и False в противном случае |
IsEmpty (Выражение) |
Возвращает True – если Выражение типа Variant была инициализирована (или описана Dim) и False в противном случае |
IsError (Выражение) |
Возвращает True – если Выражение является ошибочным и False в противном случае |
IsNull (Выражение) |
Является ли Выражение пустым значением (Null) |
IsNumeric (Выражение) |
Является ли Выражение числовым значением |
IsObject (Ссылка) |
Возвращает True – если параметр относится к типу Object и False в противном случае |
TypeName (ИмяПеременной) |
Возвращаемая строка содержит информацию о переменной-параметре |
VarType(ИмяПеременной) |
Возвращает значение типа Integer, указывающее на разновидность значения, содержащегося в Variant-переменной, передаваемой в качестве параметра |
Функция |
Функции преобразования |
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Format |
Возвращает значение типа Variant (String), содержащее выражение, отформатированное согласно инструкциям, заданным в описании формата. Синтаксис: Format (Выражение [, Формат [, ПервыйДеньНедели [, ПерваяНеделяГода]]] ) Выражение - любое допустимое числовое выражение ПервыйДеньНедели - постоянная, определяющая первый день недели ПерваяНеделяГода - постоянная, определяющая первую неделю года Формат - любое допустимое именованное или определяемое пользователем выражение формата
|
Кроме функций Val и Str в VBA имеются следующие функции преобразования типов выражений из данного в указанный.
Функции преобразования |
|
Функции |
Тип, в который преобразуется выражение |
Asc(СтрокаСимволов) |
Возвращает ASCII код первого символа строки |
CBool (Выражение) |
Преобразует числовое выражение или строку в булево значение (тип Boolean): True – если значение выражения отлично от нуля; False – если равно нулю |
CByte (Выражение) |
Преобразует числовое выражение или строку в тип Byte. Аргумент может принимать значение в диапазоне 0-255 |
CCur (Выражение) |
Преобразует числовое выражение или строку в число денежного формата (тип Currency) |
CDate (Выражение) |
Преобразует числовое выражение или строку в дату (тип Date) |
CDbl (Выражение) |
Преобразует числовое выражение или строку в число типа Double |
CDec (Выражение) |
Преобразует числовое выражение или строку в число типа Decimal |
CInt (Выражение) |
Преобразует числовое выражение или строку в число типа Integer |
CLng (Выражение) |
Преобразует числовое выражение или строку в число типа Long |
CSng (Выражение) |
Преобразует числовое выражение или строку в число типа Singl |
CVar (Выражение) |
Преобразует числовое выражение или строку в число типа Variant |
CStr (Выражение) |
Преобразует числовое выражение или строку в строку типа String |
Str (Числовое _выражение) |
Преобразует числовое выражение в строку типа String. В качестве допустимого десятичного разделителя функция Str воспринимает только точку. |
Val(Строка) |
Преобразует строку цифровых символов в число |
Функции обработки строк |
||
Функция |
Возвращаемое выражение |
Синтаксис |
Asc |
Возвращает ASCII-код первой буквы строки |
Asc (строка) |
Chr |
преобразует ASCII-код в строку |
Chr (Код) Например, Chr (13) - переход на новую строку, Chr (97) = "а" |
Lcase |
Преобразует строку к нижнему регистру |
Lcase (Строка) |
Ucase |
Преобразует строку к верхнему регистру |
Ucase (Строка) |
Left |
Возвращает подстроку, состоящую из заданного числа первых символов исходной строки |
Left (string, lenght) Аргументы: lenght - число символов string - исходная строка |
Right |
Возвращает строку, состоящую из заданного числа последних символов исходной строки |
Right (string, lenght) Аргументы: lenght - число символов string - исходная строка |
Mid |
Возвращает подстроку строки, содержащую указанное число символов |
Mid (string, start[, lenght]) Аргументы: string - строковое выражение, из которого извлекается подстрока start - позиция символов в строке string, с которого начинается нужная подстрока lenght - число возвращаемых символов строки |
Len |
Возвращает число символов строки |
Len(Строка) |
Ltrim |
Возвращает копию строки без пробелов в начале |
Ltrim(Строка) |
Rtrim |
Возвращает копию строки без пробелов в конце |
Rtrim(Строка) |
Replace |
Находит и заменяет в строке подстроку другой подстрокой |
Replace(Expression, Find, Replacewith [,Start[, Count [, Compare]]]) Аргументы: Expression – строка, в которой заменяется подстрока; Find – заменяемая подстрока; Replacewith – подстрока, на которую заменяется подстрока, указанная в качестве значения параметра find; Start – позиция в строке, с которой ищется подстрока, указанная в качестве значения параметра find. Если этот параметр опущен, то поиск производится с первой позиции; Count – указывает, сколько найденных подстрок надо заменить. Если этот параметр опущен, то будут произведены все замены; Compare – критерий сравнения при поиске подстроки. Допустимые значения: 0 (для двоичного сравнения), 1 (посимвольное сравнение без учета регистра). |
Trim |
Возвращает копию строки без пробелов в начале и в конце |
Trim(Строка) |
Space |
Возвращает строку, состоящую из указанного числа пробелов |
Space(Число) |
String |
Возвращает строку, состоящую из указанного числа повторений одного и того же символа |
String (number, “character”) Аргументы: number - число повторений символа character - повторяемый символ |
StrComp |
Возвращает результат сравнения двух строк |
StrComp (string1, string2 [, compare]) Аргументы: string1 и string2 - два любых строковых выражения compare - указывает способ сравнения строк Допустимые значения: 0 (двоичное сравнение), 1 (посимвольное сравнение без учёта регистра) Возвращаемые значения: string1 меньше, чем string2, то -1 string1 равняется string2, то 0 string1 больше, чем string2, то 1 |
StrReverse |
Возвращает строку в обратном порядке |
StrReverse (string) |
InStr |
Возвращает позицию первого вхождения одной строки внутри другой строки |
Instr([start, ]string1, string2 [, compare]) Аргументы: start - числовое выражение, задающее позицию, с которой начинается каждый поиск. Если этот аргумент опущен, поиск начинается с перввого символа строки string1 - строковые выражение, в котором выполняется поиск string2 - искомое строковое выражение compare - указывает способ сравнения строк. Допустимые значения: 0 (для двоичного сравнения), 1 (посимвольное сравнение без учёта регистра) |
Некоторые функции имеют по две версии, одна из которых возвращает тип данных Variant, а другая – тип данных String (к имени этой функции справа добавляется символ $, например, Date$()). Первая версия является более удобной, так как для значений типа Variant преобразование типов данных выполняется автоматически. Вторая версия, возвращающая тип String, использует меньше памяти и может быть полезна для экономии памяти, если в программе имеется очень много переменных, или при выполнении прямой записи данных в файлы с произвольным доступом. Функции типа String имеют такое же применение и синтаксис, как и их эквиваленты типа Variant.
Функции времени и даты |
||
Функция |
Возвращаемое значение |
Синтаксис \ Примеры |
Date |
Возвращает значение типа Variant (Date), содержащее текущую системную дату |
|
Time |
Возвращает значения типа Variant (Date), содержащее текущее время по системным часам компьютера |
|
Now |
Возвращает значение типа Variant (Date), содержащее текущую дату и время по системному календарю и часам компьютера |
|
Hour, Minute, Second |
Возвращает значение типа Variant (Integer), содержащее целое число, которое представляет часы, минуты и секунды в значении времени |
Hour (время) Minute (время) Second (время) время - значение времени или выражение, его определяющее В следующем примере переменной Час присваивается 16, Минута - 35 и Секунда - 17: РасчётнВремя = #4:35:17 РМ# Час = Hour (РасчётеВремя) Минута = Minute (РасчётнВремя) Секунда = Second (РасчётнВремя) |
Day, Month, Year |
Возвращает целое значение Variant (Integer), содержащее целое число, которое представляет день, месяц, год в значении даты |
Day(дата) Month(дата) Year (дата) дата - значение даты или выражение, её определяющее В следующем примере переменной День присваивается 17, Месяц - May, Год - 1960: День Рождения = #May 17, 1960# День = Day (День Рождения) Месяц = Month (День Рождения) Год = Year (День Рождения) |
Weekday |
Возвращает значение типа Variant (Integer), содержащее целое число, представляющее день недели |
Weekday (date, [firstdayofweek]) date - выражение, представляющее дату firstdayofweek - указывает первый день недели. Если этот аргумент опущен, подразумевается vbSunday (воскресенье). Допустимы также значения: vbMonday (понедельник), vbTruesday (вторник), vbWednesday (среда), vbThursday (четверг), vbFriday (пятница) и vbSaturday (суббота) В следующем примере переменной ДеньНедели присваивается 3, т.е. вторник: ДеньРождения = #May 17, 1960# ДеньНедели = Weekday (ДеньРождения) |
Timer |
Возвращает значение типа Single, представляющее число секунд, прошедших после полуночи |
|
DateDiff |
Возвращает значение типа Variant (Long), указывающее число переменных интервалов между двумя датами. |
DateDiff (interval, date1, date2[, firstdayofweek[, firstweekofyear]]) Аргументы: interval - строковое выражение, указывающее тип временного интервала, который следует использовать при вычислении разности между датами date1 и date2. Допустимые значения: уууу (год), q (квартал), m (месяц), y(день года), d (день месяца), w (день недели), ww (неделя), h (часы), m (минуты), s (секунды) date1, date2 - значение типа Variant (Date). Две даты, разность между которыми следует вычислить firstdayofweek - постоянная, указывающая первый день недели firstweekofyear - постоянная, указывающая первую неделю года В следующем примере переменной ПрожилМесяцевСРождения присваивается 465: ПрожилМесяцевСРождения = DateDiff ("m", #/5/17/60#, Now) |
DatePart |
Возвращает значение типа Variant (Integer), содержащее указанный компонент даты |
DatePart (interval, date[, firstdayofweek[, firstdayofyear]]) |
DateAdd |
Возвращает значение типа Variant (Date), содержащее дату, к которой добавлен указанный временной интервал |
DateAdd (interval, number, date) Аргументы: interval - строковое выражение, указывающее тип добавляемого временного интервала. number - числовое выражение, указывающее число временных интервалов, которое следует добавить. Оно может быть положительным (для получения более поздних дат) или отрицательным (для получения более ранних дат). date - значение типа Variant (Date) или литерал даты, представляющий дату, к которой добавляется указанный временной интервал В следующем примере переменной День присваивается 03/17/63: День = DateAdd ("m", 34, #05/17/60#) |
TimeSrial |
Возвращает значение типа Variant (Date), содержащее значение времени, соответствующее указанным часу, минуте и секунде |
TimeSerial (hour, minute, second) Аргументы: hour, minute и second - значения типа Variant (Integer) В данном примере переменной Время присваивается 16:35:17: Время = TimeSerial (16, 35, 17) |
DateSerial |
Возвращает значение типа Variant (Date), соответствующее указанным году, месяцу и дню |
DateSerial (year, month, day) Аргументы: year, month и day - значения типа Integer. В следующем примере переменной Дата присваивается 05/17/60: Дата = DateSerial (1960, 5,17) |
TimeValue |
Преобразует строку в формат времени |
|
Функции выбора |
|
Функция |
Возвращаемое значение |
Iif |
Возвращает одну из двух альтернатив. Синтаксис: Iif (expr, truepart, falsepart) expr - проверяемое выражение truepart - значение или выражение, возвращаемое, если expr имеет значение True falsepart - значение или выражение, возвращаемое, если expr имеет значение False В следующем примере, если значение переменной ОценкаЦифрой равно 5, то переменной ОценкаПрописью присваивается строковая константа Отлично. В противном случае ей присваивается значение Не отлично: ОценкаПрописью = Iif (ОценкаЦифрой = 5, "Отлично", _ "Не отлично") |
Choose |
Возвращает значение выбранное из списка аргументов. Синтаксис: Choose (индекс, вариант-1[, вариант-2, … [,вариант-n]]) индекс - числовое выражение или поле, значением которого является число, лежащее между 1 и числом элементов в списке вариант - выражение типа Variant, содержащее один из элементов списка Действие функции Choose: если индекс равняется 1, возвращается первый элемент списка, если индекс равняется 2, возвращается второй элемент списка и т.д. Функцию Choose можно использовать для выбора одного из возможных значений, представленных в виде списка. В следующем примере, если аргумент Выбор принимает значение 3, то переменной РезультатВыборы присваивается значение "три": РезультатВыборы = Choose (Выбор, "один", "два", "три") |
Switch |
Возвращается значение соответствующее первому истинному выражению в списке. Синтаксис: Switch (выражение-1, значение-1[, выражение-2, значение-2 … [, выражение-n, значение-n]]) выражение - выражение типа Variant, подлежащее вычислению значение - возвращаемое значение или выражение, если соответствующее выражение принимает значение True В сленующем примере функция по указанной фамилии возвращает название должности сотрудника некоторой фирмы: Должность = Switch (Фамилия = "Парижский", "Президент", _ Фамилия = "Быстров", "Менеджер", _ Фамилия = "Курочкина", "Референт") |
Встроенные диалоговые окна |
|
В проектах VBA часто встречаются две разновидности диалоговых окон: окна сообщения и окна ввода. Они встроены в VBA, и если их возможностей достаточно, то можно обойтись без проектирования диалоговых окон. Окно сообщений (MsgBox) выводит простейшие сообщения для пользователя, а окно ввода (InputBox) обеспечивает ввод информации. |
|
Функция |
Возвращаемое значение |
Функция InputBox |
Выводит на экран диалоговое окно, содержащее сообщение и поле ввода, устанавливает режим ожидания ввода текста пользователем или нажатия кнопки, а затем возвращает значение типа String, содержащее текст, введенный в поле. Синтаксис: InputBox (promt [, title] [, default] [, xpos] _ [, ypos] [, helpfile, context]) Аргументы: promt - строковое выражение, обозначаемое как сообщение в диалоговом окне. Строковое значение promt может содержать несколько строк. Для разделения строк допускается использование символа возврата каретки (Chr (13)), символа перевода строки (Chr (10)) или комбинацию этих символов (Chr (13) & Chr (10)) title - строковое выражение, отображаемое в строке заголовка диалогового окна. Если этот аргумент опущен, поле ввода изображается пустым xpos - числовое выражение, задающее расстояние по горизонтали между левой гланицей диалогового окна и левым краем экрана. Если этот аргумент опущен, диалоговое окно выравнивается по центру экрана по горизонтали ypos - числовое выражение, задающее расстояние по вертикали между верхней границей диалогового окна и верхним краем экрана. helpfile - строковое выражение, определяющее имя файла справки, содержащего справочные сведения о данном диалоговом окне. Если этот аргумент указан, необходимо наличие также аргумента context context - числовое выражение, определяющее номер соответствующего раздела справочной системы. Если этот аргумент указан, необходимо также наличие аргумента helpfile |
Процедура MsgBox |
Выводит на экран диалоговое окно, содержащее сообщение, устанавливает режим ожидания нажатия кнопки пользователем, а затем возвращает значение типа Integer, указывающее, какая кнопка была нажата. Синтаксис: MsgBox promt [, buttons] [, title] [, helpfile, contex] Аргументы: promt - строковое выражение, отображаемое как сообщение в диалоговом окне buttons - числовое выражение, представляющее сумму значений, которые указывают число и тип отображаемых кнопок, тип используемого значка, основную кнопку и модальность окна сообщения. Значение по умолчанию этого аргумента равняется 0. Значения констант, определяющих число и тип кнопок приведены в таблицах, представленных ниже. title - строковое выражение, отображаемое в строке заголовка диалогового окна. Если этот аргумент опущен в строку заголовка помещается имя приложения helpfile - строковое выражение, определяющее имя файла справки, содержащего справочные сведения о данном диалоговом окне. Если этот аргумент указан, необходимо указать также аргумент context context - числовое выражение, определяющее номер соответствующего раздела справочной системы. Если этот аргумент указан, необходимо также наличие аргумента helpfile |
Значения аргумента buttons процедуры MsgBox, определяющие отображаемые кнопки в диалоговом окне |
||||
Константа |
Значение |
Отображаются кнопки |
||
vbOKOnly |
0 |
ОК |
|
|
vbOKCancel |
1 |
ОК |
Отмена |
|
vbAbortRetryIgnore |
2 |
Стоп |
Повтор |
Пропустить |
vbYesNoCancel |
3 |
Да |
Нет |
Отмена |
vbYesNo |
4 |
Да |
Нет |
|
vbRetryCancel |
5 |
Повтор |
Отмена |
Значения аргумента buttons процедуры MsgBox, определяющие отображаемые информационные значки в диалоговом окне |
||
Константа |
Значение |
Значок сообщения |
vbCritical |
16 |
|
vbQuestion |
32 |
|
vbExclamation |
48 |
! |
vbInformation |
64 |
i |
Значения аргумента buttons процедуры MsgBox, определяющие основную кнопку в диалоговом окне |
||
Константа |
Значение |
Номер основной кнопки |
vbDefaultButton2 |
0 |
1 |
vbDefaultButton2 |
256 |
2 |
vbDefaultButton3 |
512 |
3 |
vbDefaultButton4 |
768 |
4 |
При написании программ с откликом, в зависимости от того, какая кнопка нажата, вместо возвращаемых значений удобнее использовать следующие константы VBA, которые делают код программы более удобочитаемым и, к тому же, их легко запомнить.
|
||
Константа |
Значение |
Нажатая кнопка |
vbOk |
1 |
ОК |
vbCancel |
2 |
Отмена (Cancel) |
vbAbort |
3 |
Прервать (Abort) |
vbRetry |
4 |
Повторить (Retry) |
vbIgnore |
5 |
Пропустить (Ignore) |
vbYes |
6 |
Да (Yes) |
vbNo |
7 |
Нет (No) |
Статистические функции
Функции MS Access |
|
Функция |
Выполняемая операция |
Avg |
Вычисляет арифметическое среднее набора чисел, содержащихся в указанном поле запроса. |
Min, Max |
Возвращают минимальное и максимальное значения из набора значений, содержащихся в указанном поле запроса. |
Count |
Вычисляет количество записей, возвращаемых запросом. |
Sum |
Возвращает сумму набора значений, содержащихся в заданном поле запроса. |
Var, VarP |
Возвращают значение смещенной и несмещенной дисперсии, вычисляемой по набору значений, содержащихся в указанном поле запроса. |
Операторы MS Access |
|
Операторы |
Выполняемая операция |
Mod (математический) |
Остаток от деления по модулю. Округляет оба числовые выражения до целых, делит первое на второе и возвращает остаток |
Between (сравнения) |
Проверяет значение поля на соответствие заданному диапазону значений |
In (сравнения) |
Проверяет на равенство любому значению из списка |
Like (сравнения) |
Проверяет соответствие текстового поля, гиперссылки или поля MEMO заданному шаблону символов |
And (логический) |
Логическое умножение |
Or (логический) |
Логическое сложение |
Not (логический) |
Логическое отрицание |
Xor (логический) |
Исключающее Or |
& |
Сцепление символьных строк |
Обратите внимание на наличие в кнопочной форме элемента управления «Флажок» с надписью «Больше не показывать окно». Как может быть реализован этот режим?
©ВГАВТ, Кафедра
учета, анализа и аудита, Румянцев С.С.,
2002 стр.