Константи

Константи мають деяку схожість із змінними - вони теж оголошуються і їм привласнюються значення. Проте у відмінності від змінних, значення констант залишаються незмінними упродовж усього життєвого циклу додатка. Використання констант зазвичай спрощує програмування - набагато простіше зрозуміти і відналагодити програму із змінною vbModal, чим стежити за долею якої-небудь безіменної змінної зі значенням 1. Одночасно з оголошенням константи їй привласнюється значення. Для цього використовується ключове слово Const:

Const conPi = 3.142

Приведений нижче фрагмент демонструє можливості практичного застосування констант:

Const conPi = 3.142

Dim Radius As Integer

Dim Area As Double

Option Explicit

Private Sub cmdPrintArea_Click()

Radius = 3

Area.= conPi * (Radius ^ 2)

Print Area

End Sub

Цей фрагмент обчислює площу круга, використовуючи константу з ім'ям conPi (префікс con необов'язковий, хоча і бажаний). Вичислена площа круга виводиться на поточній формі (мал. 7.10).

Мал. 7.10. Результат обчислення площі круга.

Константи можна оголошувати як в процедурах, так і в секціях оголошень модулів. Щоб створити константу, доступну на рівні додатка, вкажіть при її оголошенні ключове слово Global, - наприклад Global Const Pi = 3.142.

Правильний вибір змінних для поставленого завдання є питанням першорядної ваги. Він не лише економить час при відладці, але і допомагає написати компактнішу програму і привчає до дисципліни програмування. Не можна побудувати будинок, користуючись однією викруткою, - існує велика кількість інструментів, і кожен з них вирішує свою задачу. To же саме відноситься і до змінних. Прагніть правильно підбирати засоби для вирішення конкретного завдання.