Access, VBA - пример

Подпрограмма вычисления площади круга с помощью Access 2007

1. Запустите Access 2007

2. Новая база данных

3. В строке меню: Работа с базами данных, далее щёлкаем по Visual Basic.

4. В строке меню: Insert, далее щёлкаем по Module.

5. Код программ для Access набирается в окне редактора Microsoft Visual Basic:

Option Compare Database

Option Explicit

Sub CalculateCircumference()
Dim Circumference As Double, Radius As Double
Const PI = 3.14
Radius = 10
Circumference = PI * Radius ^ 2
End Sub

6. Debug, далее щёлкаем по Run.

7. Щёлкаем по Circumference, видим результат: Circumference = 314

Литература

[121] Киммел Пол. Освой самостоятельно программирование для Microsoft Access 2002 за 24 часа.: Пер. с англ.. - М.: Издательский дом "Вильямс", 2003. - 480с.

Комментарий

Немного по другому, чем у Пола.