Окно Immediate Используется: - для отладки и обнаружение ошибок в программах VBA, - просмотра значений переменных, - выполнение команд в окне Immediate Вызывается через меню View или (<Ctrl>+<G>)
Окно Immediate Просмотр может выглядеть так: Print A или : ? A Вывод в окно Immediate можно произвести при помощи этого объекта и просто из кода программы: Debug. Print A Преимуществом этого метода перед обычным Msg. Box() является то, что при работе не в режиме отладки все вызовы методов объекта Debug просто игнорируются.
Окно Immediate • Изменение значений перемененных и свойств в окне Immediate производится точно так же, как в коде программы. • В окне Immediate можно также вызывать процедуры и функции вашей программы или методы объектов — точно так же, как в коде программы. Microsoft рекомендует перед вставкой в программу проверять потенциально опасный код (например, который может завесить систему) в этом окне. • А можно использовать это окно просто как калькулятор, вводя там выражения вида Print 25*115
Операторы присваивания • Операторы присваивания служат для изменения значения переменных. • Синтаксис оператора выглядит следующим образом: • <имя. Переменной>=<выражение> • . С помощью оператора присваивания (=) происходит обычное присваивание значения выражения, стоящего справа от знака (=), переменной, имя которой стоит слева от знака. Причем тип присваиваемого значения должен соответствовать типу переменной.
Операторы присваивания Существуют некоторые ограничения на использование типов данных для двух частей выражения присвоения. • Если числовой переменной присваивается текстовое значение, переменной типа Boolean значение, отличное от True или False, или объектной переменной любое необъектное значение, возникает ошибка. • Если числовой переменной присваивается значение, которое находится за пределами диапазона значений данного типа, возникает ошибка. • Если строковой переменной присваивается числовое значение, это число преобразуется в текстовый эквивалент. • Если значение с плавающей точкой присваивается переменной целого типа, это значение округляется до ближайшего целого числа. • Символ = может использоваться также в VBA как оператор сравнения. Из контекста всегда понятно, в каком значении применен оператор: для присвоения или для сравнения.
Присваивание переменной ссылки на объект Для присвоения переменной ссылки на объект применяется инструкция Set. Пример Переменной r присваивается ссылка на диапазон А 1: Set r = Range("Al ") В общем случае инструкция Set имеет следующий синтаксис: Set var. Name = {[New] Выражение | Nothing} ключевое слово New используется при создании нового экземпляра класса; ключевое слово Nothing позволяет освободить все системные ресурсы и ресурсы памяти, выделенные для объекта, на который имелась ссылка (вольно говоря, она удаляет объект из памяти).
Линейная программа
Пример линейного алгоритма
Фрагмент – объявление переменных и ввод Public Sub Line_prog() Dim a As Double, b As Double, c As Double Dim P As Double, S As Double, r As Double 'Ввод значений a, b, c a = CDbl(Input. Box("Введите значение a")) b = CDbl(Input. Box("Введите значение b")) c = CDbl(Input. Box("Введите значение c"))
Блок расчета 'Расчет параметров P=a+b+c r=P/2 S = (r * (r - a) * (r - b) * (r - c)) ^ 0. 5
Вывод результатов ' Вывод результатов на экран Msg. Box "Значение P=" & P & Chr(10) & _ "Значение S=" & S
Вывод на рабочий лист With Worksheets("Лист1"). Range("A 1") = "a” ; . Range("A 2") = a. Range("B 1") = "b“. Range("B 2") = b. Range("C 1") = "c“ ; . Range("C 2") = c. Range("D 1") = "P“; . Range("D 2") = P. Range("E 1") = "S“; . Range("E 2") = S 'Форматирование ячеек. Range("A 1: E 1"). Font. Color = RGB(255, 0, 0). Range("A 1: E 1"). Interior. Color = RGB(120, 120) End With End Sub
Скачать презентацию Окно Immediate Используется — для отладки и обнаружение
Lek_6.ppt