Константы. 1. Числовые: Byte, Integer, Long, Single, Double, Currency, Decimal

Типы данных

1. Числовые: Byte, Integer, Long, Single, Double, Currency, Decimal.

2. Строковые: String

3. Дата и время: Data

4. Логический: Boolean

5. Объектный: Object

6. Variant

Перед работой с переменной ее объявляют. Dim - область видимости переменной.

Private (Dim)- значит переменной доступна по всему телу программы. Static - переменной используется только в нутрии процедуры. В рамках VBA имя переменной должно начинаться с префикса записанного строчными буквами.

InputBox- оператор ввода…………….а= InputBox (“Введите число а=”)

MsgBox- оператор вывода.

Создать программу которое запрашивает и печатает имя пользователя.

Public Sub: Programm ()

Dim sName As String

sName= InputBox (“Введите ваше имя”)

MsgBox sName

End Sub

Const Name As String = “Microsoft”.

Просмотр служебных констант осуществляется через справочную систему.

MS Visual Basic Documentation (VB Language Retrecce)

vbCrLf Позволяет осуществить переход на новую строку

MsgBox “1-я строка” + vbCrLf + “2-я строка”

Тема: операторы условного и безусловного перехода.

В VBA предусмотрено 2 условного перехода: if…Then и Select Case.

Оператор if…Then - самый популярный у программистов. Его синтаксис выглядит так:

If Условие Then

Команды 1

[Else Условие Then

Команды N]

[Else

Команды2]

End If

Оператор Select Case подходит для проверки одного и того же значения, которое нужно много раз сравнивать с разными выражениями. Синтаксис его очень прост:

Select Case Выражение

Case условие1

Команды1

[case условиеN

командыN]

[case Else

Команды2]

End Select

Оператор GoTo - это оператор безусловного перехода, когда ход выполнения программы без проверки каких-либо условий перепрыгивает на метку в коде. Пример использования GoTo может выглядеть так:

GoTo EngineNotStarted

….

EngineNotStarted:

MsgBox “Едем на метро”

Тема: массивы и циклы

1. Мы знаем сколько раз нужно выполнить определенное действие, используем оператор for…next:

For iZCounter=1 to 10

msgBox “счетчик:”&icounter

next

2. Чтобы указать, на сколько должно нарастать значение счетчика, используется слово Step:

For iCounter=1 to 10 step 2

msgBox “счетчик:”& icounter

next

3. Для безусловного выхода из конструкции For…next используется команды Exit For:

VStop = UnpuBox (“Введите значение:”)

VInput=CInt (VStop)

For iCouter=1 to 10

MsgBox “”&icouter

If iCounter – VInput Then Exit For

Next

4. Для использования всех элементов используют For Each…next:

For Each o Wbk in Workbooks

MsgBox o Wbk.Name

Next

5. Конструкция Do while…Loop означает выполнять какое-либо действие до тех пор, пока условие истинно:

Do While MyVar < 10

MyVar=MyVar+1

MsgBox “MyVar=”& MyVar

Loop

6. Конструкция do until…loop означает выполнять какое-либо действие до тех пор, пока условие ложно. Можно переписать цикл так чтобы условие проверялось после завершения цикла:

Do

MyVar=MyVar+1

WScript.Echo “MyVar=”& MyVar

Loop Whilr MyVar<10

7. Конструкция While…Wend. Она такая же как и конструкция Do While….Loop.

Дата добавления: 2015-06-04