VBA для чайников
Шрифт:
Можно также с помощью этого программного кода конвертировать введенные данные в данные подходящего вида, например сделать все буквы прописными.
Рис. 10.27. Для проверки введенных данных в текстовом поле и отображения этого сообщения об ошибке использовалась процедура обработки события Change
Проверка значений элементов управления требует использования операторов
If. . .Then и Select Case. В следующем простом примере проверяется на допустимость значение элемента управления кнопками прокрутки:
Private Sub spnVolumeControl_Change
If spnVolumeControl.Value = 13 Then
MsgBox "13 не является допустимым значением."
End If
End Sub
Проверка
Момент проверки данных | Используемая процедура |
При нажатии любой клавиши | Процедура об работки события Key Press для элемента управления (для выяснения информации о нажатии отдельной клавиши) |
При любом изменении значения элемента управления | Процедура обработки события Change (для оценки значения) |
По окончании работы пользователя с элементом управления, непосредственно перед переходом к другому | Процедура обработки события Be Fore Update (позволяет отменить обновление данных и вернуть пользователя к текущему элементу управления) |
При закрытии формы пользователем | Процедура обработки события click для кнопок ОК или Закрыть в форме |
Вы сами должны выбрать подходящую для проверки процедуру, ответив на следующие вопросы.
* Насколько быстро должен выполняться программный код проверки?
* В какой момент нужно информировать об ошибке пользователя- в момент появления неправильного значения или уже после того, как пользователь закончит формирование вводимых данных?
* Основывается ли проверка на значениях, полученных от нескольких элементов управления?
Часть III Практикуемся в программировании на VBA
В этой части...
После того как вы познакомились с основами программирования на VBA и решили попробовать свои силы, вам пора изучить материал части III В главе 11 рассматриваются встроенные функции и операторы VBA; я не рекомендую вам создавать собственную процедуру, если встроенная функция сможет выполнить те же действия всего в одну строку. В главе 12 мы поговорим об использовании объектов. В главе 13 мы еще раз затронем тему управления данными, однако на этот раз речь будет идти о таких сложных вопросах, как использование массивов и коллекций.
Глава 11. Инструменты встроенного оркестра VBA.
В этой главе ...
~ Использование встроенных команд вместо нового изобретения программирования
~ Безопасное форматирование данных с помощью функции Format
~ Преобразование данных одних типов в другие
~ Работа с текстовыми строками
~ Забавы с датами и временем
~ Использование математических и финансовых функций
Прежде чем создавать свою собственную процедуру с чистого листа, убедитесь, что вы не изобретаете велосипед. Каждая версия VBA приходит с небольшим арсеналом встроенных команд, предназначенных для решения самых разнообразных часто возникающих задач. В этой главе предлагается обзор наиболее полезных из таких готовых к бою единиц вооружения. Кое-что в этот обзор не вошло и обсуждается среди прочего в других главах.
Знакомство со встроенными командами
Похоже, VBA немного не соответствует тому имиджу, который он себе создает. Ох, как отчаянно VBA хочет выглядеть истинным объектно-ориентированным языком
программирования (об объектно-ориентированном программировании мы поговорим в главе 12). С другой стороны, следует признать, что есть кое-что, что вы хотели бы иметь в программе, но нельзя сказать, что это естественным образом умещается в матрицу объектно-ориентированного подхода.В своем решении, достойном всех наших депутатов, VBA помещает в метод объекта как минимум одну команду, которую было бы естественнее оставить независимой, и в то же время оставляет независимыми другие действия, которые вполне подходят для связывания их с объектами.
В общем, учитывая, что некоторые действия могут оказаться в нелогичных для них категориях, вы получаете три типа встроенных VBA-команд, способных выполнять полезную работу.
* Операторы. Хотя термин оператор уже используется для обозначения целой программной директивы (см. главу 7), VBA называет операторами и отдельные ключевые слова, выполняющие специальные задачи. Некоторые из таких ключевых слов функционируют сами по себе как целые операторы. Например, оператор Веер заставляет динамик компьютера издавать звук. Другие же должны использоваться как составные части законченных операторов. Например, оператор ChDi r (перейти в каталог) бесполезен без аргумента, задающего каталог или папку, куда нужно перейти:
ChDir("\Отчеты о мечтаниях ")
* Функции. Встроенные функции работают точно так же, как и процедуры типа Function, обсуждавшиеся в главе 7,- в том смысле, что они возвращают значение. Использование функции часто заключается в присваивании ее значения переменной, как в следующем примере с функцией Tan (тангенс):
dblТангенс = Tan (dblЛюбойУгол)
Функции могут также обеспечивать значения для более сложных выражений или условных операторов, например:
If Tan (dblОстрыйУгол) < 45 Then
* Методы встроенных объектов. В этой группе курьезно выглядит метод Print, единственный для объекта Debug и предназначенный для направления вывода в окно немедленного выполнения команд (окно Immediate) в редакторе Visual Basic. Для этого используются операторы типа
Debug.Print (strПосланиеМарсианина)
* Лично я не вижу никаких преимуществ в связывании команды Print с объектом, но сам по себе метод Print оказывается очень полезным. Подробно он обсуждается в главе 14. Здесь же замечу, что, хотя VBA и не инкапсулирует файлы, как объекты, можно дополнительно установить программную надстройку, которая позволит управлять файлами и работать с их содержимым на основе объектно-ориентированного подхода (подробности - в главе 12).
В табл. 11.1 приводятся некоторые из встроенных VBA-команд, взятые для примера и относящиеся к различным категориям (операторы, функции, методы). Дальше в главе будут рассматриваться чаще всего используемые встроенные команды.
Таблица 11.1. Примеры встроенных функций, операторов и методов
Команда | Тип | Выполняемые действия |
Randomize | Оператор | Инициализирует генератор случайных чисел |
Sqr ( число) | Функция | Возвращает значение квадратного корня числа |
Format ( строка ) | Функция | Форматирует строку в соответствии с заданным описанием |
Date | Оператор | Устанавливает системную дату |
Date | Функция | Возвращает текущую системную дату |
Err . Raise | Метод объекта Err | Генерирует ошибку выполнения с заданным кодом данных |