Отправляет email-рассылки с помощью сервиса Sendsay

Программирование и готовые решения

Подписаться Бесплатная «Серебряная» новостная рассылка . Подписчиков 5.408 RSS
←   Декабрь 2015   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31


За последние 60 дней ни разу не выходила


Сайт рассылки: http://blog.leadersoft.ru
Открыта: 29-08-2000

Автор
leadersoft.ru

Статистика

5.408 подписчиков
0 за неделю
←   Все выпуски   →

Microsoft Access. Обозначение переменных



Microsoft Access. Обозначение переменных
2015-12-21 19:31 noreply@blogger.com (Виктор Leadersoft)
access-icon.png

Первым шагом в программирование является определение переменных. Они бывают локальными и глобальными. Локальные - действуют на уровне функций, глобальные доступны из любого места программы. Существуют также и другие ограничения видимости переменных, например, классы. Изучим небольшой курс лекций

Лекция 1а. Глобальные переменные

Для начала определим название нашей программы. Пусть это будет приложение Microsoft Access «Новый калькулятор.mdb». Разработку его начнем с описания переменных, констант, которые потребуются при создании нашей базы данных.
appAccess – это объектная переменная, в которой мы будем создавать новую базу данных
appCM – это константа, которая управляет размером управляющих элементов в формах, отчетах. В Access элементы измеряются в твипах, а нам удобнее указывать размеры в сантиметрах, поэтому, и вводим эту переменную.

appFolder – эта переменная будет содержать главный каталог нашего приложения. Далее мы будем использовать ее для загрузки рисунков, программ, справки и других внешних элементов базы данных

Public appAccess As Access.Application 'Приложение программы

Public Const appCM As Integer = 567 'Размерность (1см=567 твип)

Public appFolder As String                    'Папка приложения

Лекция 1b. Создание приложения

Продолжим создание приложения с разработки всех функций, которые требуются для работы базы данных. Сначала программным способом, т.е. без мастеров, создадим базу данных, затем таблицы, запросы и т.д.
Чтобы нашей программой могли воспользоваться другие пользователи, дополнительно укажем в угловых скобках номер лекции, где можно найти программу. Например, <4> будет означать, что программа описана в четвертой лекции.

Public Function funCreateApp() As Boolean

   On Error GoTo 999 'Назначаем переход по ошибке
   Set appAccess = New Access.Application ‘Создаем приложение
   appFolder = funGetAppFolder ‘<1> Находим папку
  
   funCreateDatabase "Новый калькулятор.mdb" '<2> Создаем базу данных
   funCreateTable "Калькулятор" '<3> Создаем таблицу
   funCreateQueries '<4> Создаем запросы
   funCreateModule '<5> Импортируем модули
   funCreateForm "Мой калькулятор”   ‘<6> Создаем форму
   funCreateReport "Отчет об итогах" '<7> Создаем отчет
   funCreateMacro "AutoExec" '<8> Создаем макрос
   funImportModule "Справка.bas", "Справка" '<9> Создаем справку
   funCreateMenu "Калькулятор" '<10> Создаем меню
  
   funCloseDatabase "Новый калькулятор.mdb" '<2> Закрываем программу
   funCreateApp = True ‘Возвращаем значение
   Exit Function 'Выходим из программы
999:
   MsgBox Err.Description 'Сообщаем об ошибке
   Err.Clear 'Очищаем поток от ошибок

End Function
В избранное