Доклад: Макровирусы

For Count=1 to 10 'Цикл от 1 до 10

lnfect_Num=lnfect_Num+Count

Next Count

MsgBox "Достигли максимального количества заражений"

End Sub

4-1436

условие "If-then":

Sub lnfect_Check

If lnfect_Num=0 Then MsgBox "Файл не заражен"

End Sub

конструкция "With-end with" (используется для работы с несколькими
свойствами конкретного объекта):

Sub ChangeProperties
With Selection
.Font.Bold=True

.Font.Colorlndex=3 'красный цвет
End With
End Sub

селектор "Select case-end case":

Sub CheckJnfection

Select Case lnfect_Num

Case 0

MsgBox "Файл не заражен"

Case is > О

MsgBox "Файл заражен"

Case is < О

lnfect_Num=0

End Case

End Sub

Полезным инструментом для работы с VBA является окно отладки.
В нем можно трассировать код, вносить в него изменения и делать мно-
гое другое. В процессе отладки для остановки на некоторое время ис-
полнения кода используются флаги. Чтобы можно было анализировать
содержимое конкретных переменных и/или инструкций, после каждой
команды выводятся сообщения (в отладчике VBA для прерывания ис-
полнения кода можно ставить также контрольные точки).

Нужно обратить внимание на разнообразные аргументы функций.
Как уже говорилось, структура их следующая:

Function <Имя>(Аргументы)

[.]
End Function

Аргументами могут быть константы, переменные или выражения.
Процедуры могут быть и без аргументов.