Наконец, строка
lblNow.Caption = Quote Format(Now, dddddd, hh ч. mm мин.)
содержит программный код, который непосредственно отображает нужное сообщение в форме. Эта строка начинается с идентификации элемента управления с именем lblNow как объекта, с которым идет работа. После имени стоит точка, означающая, что далее идет свойство объекта lblNow - в данном случае это свойство Caption. Вообще любое свойство подобно переменной, и его можно изменить во время выполнения программы. Поэтому, чтобы изменить установки свойства, в программном коде используется знак равенства. Оставшаяся часть строки определяет сообщение, которое должно появиться на экране в виде надписи.
Первой частью сообщения является переменная Quote. Следующий затем знак плюс дает указание VBA добавить то, что следует дальше, к тексту, хранящемуся в переменной Quote. В скобках функция Now говорит VBA, что нужно сбегать и узнать текущие показания часов компьютера, которые постоянно отсчитывают дату и время. Затем функция Format берет эту сырую информацию и представляет ее в виде, который сможете прочитать вы. Странный набор букв в кавычках как раз и определяет вил даты и времени на экране, но здесь я не собираюсь вдаваться в детальные объяснения по этому поводу - подробную информацию вы найдете в главе 11.
3-й шаг. Тестирование программы
Так это только шаг 3? Не волнуйтесь, остальные шаги цикла разработки программы не будут слишком длинными.
Теперь программа готова к пробному запуску, с помощью которого вы сможете увидеть, работает пи она в соответствии с вашими планами. Чтобы запустить программу из редактора Visual Basic, выполните следующее.
1. Щелкните либо в окне формы, либо в окне программного кода, чтобы соответствующее окно стало активным.
Вспомните, что выяснить, какое из окон активно, можно по полосе заголовка окна - у активного окна цвет полосы заголовка отличается от цвета полос заголовков неактивных окон (у которых по умолчанию они тускло-серые).
2. Затем воспользуйтесь одним из следующих способов.
*span**** /spanВыберитеspan Run = Run Sub/UserForm из меню.
* Щелкните на кнопке Run (Выполнить) в панели инструментов Standard (Стандартная) редактора Visual Basic. (Сразу после установки приложения панель инструментов Standard оказывается единственной видимой панелью инструментов в редакторе Visual Basic до тех пор, пока вы сами не измените настройки в соответствии с инструкциями главы 5.)
* Нажмите F5.
После небольшой задержки окно нашей с вами программы появится на фоне вашего VBA-приложения (а не редактора Visual Basic). Если все в порядке, вы увидите нечто, очень похожее на рис. 3.18.